Տուն
Top.Mail.Ru Moscow
Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2002.01.08;
Բեռնել: [xml.tar.bz2];

Down

Directoryնջելով գրացուցակի պարունակությունը Գտնել նմանատիպ մասնաճյուղեր


Марина   (2001-12-20 15:42) [0]

Ասա ինձ, խնդրում եմ, ինչպես ջնջել գրացուցակի պարունակությունը և գրացուցակը թողնել ինքն իրեն: Deletefile- ի նման մի բան է անհրաժեշտ ("c: \ kio \ massiv \ *. *") Անհրաժեշտ է: Ես նախապես շնորհակալ եմ և ներողություն եմ խնդրում «Դմիտս» հարցի համար:



gek   (2001-12-20 15:47) [1]

եթե Findfirst ("\ TEMP \ *. tmp", faAnyFile, SearchRec) = 0 ապա
իսկ (FindNext (SearchRec) = 0)
եթե ոչ ջնջել (pchar ("\ TEMP \" + SearchRec.name)), ապա
Դիմում.
FindClose (SearchRec);



Dimka Maslov   (2001-12-20 16:05) [2]

օգտագործում է Windows, SysUtils, Classes, Masks; կարգը DeleteFiles (Ուղին ՝ լարային); var Դիմակ `լարային; SearchRec: TSearchRec; FindResult: Interes; Ցուցակ: TStringList; i: Հետաքրքրություն; սկսվում է Դիմակ. = ExtractFileName (Ուղի); եթե Դիմակ = "", ապա Դիմակ. = "*. *"; Ուղին. = ExtractFilePath (Ուղին); եթե Ուղին = "", ապա Ուղին. = ՆերառեքTrailingBackslash (GetCurrentDir); Ցուցակ ՝ = TStringList.Create; փորձիր FindResult: = FindFirst (Ուղի + "*. *", FaAnyFile, SearchRec); փորձիր իսկ FindResult = 0- ը անում են SearchRec- ով եթե ((Attr և faDirectory) = 0) և MatchesMask (Անուն, դիմակ), ապա Ցուցակ. Ավելացնել (անուն); FindResult. = FindNext (SearchRec); վերջ; i- ի համար. = 0 to List.Count - 1 do DeleteFile (Ուղի + ցուցակ [i]); վերջապես FindClose (SearchRec); վերջ; վերջապես Ցուցակ. Անվճար; վերջ; վերջ;



Էջեր: 1 ամբողջ ճյուղը

Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2002.01.08;
Բեռնել: [xml.tar.bz2];

Up





Հիշողություն `0.55 ՄԲ
Ժամանակը `0.02 գ
1-22209
Սնունդ
2001-12-14 14:10
2002.01.08
Արդյոք որեւէ մեկը օգտագործեց PaintTo- ի գործառույթը WinControls- ը կտավի բիտման վրա: Օգնություն Ես ոչինչ չեմ կարող անել:


3-21931
Քոչարիֆ
2001-12-04 15:59
2002.01.08
Ինչ է սա սխալը: Հնարավորությունը չի ենթարկվում


1-22028
ՏՈՇ ՍՈՒԽՈՎ
2001-12-18 12:16
2002.01.08
Գուցե ինչ-որ մեկը գիտի ...


14-22320
Alexandr
2001-11-14 14:13
2002.01.08
Wow


1-22229
Մարդ կարմիր
2001-12-16 14:31
2002.01.08
Կրկին հարցն առնչվում է RichEdit- ին:





afrikaans ալբանական արաբական հայերեն ադրբեջանական Բասկերի Բելառուսի Բուլղարիայի catalan Չինարեն (պարզեցված) Չինարեն (ավանդական) Խորվաթիայի չեխ դանիերեն հոլանդական Անգլերեն
Էստոնիայի filipino ֆիններեն ֆրանսերեն
galician վրացական գերմանական հունարեն haitian Creole եբրայերեն հինդի հունգարերեն icelandic հայերեն իռլանդական իտալական ճապոնացի Կորեայի Լատվիայի Լիտվայի մակեդոներեն Մալայերեն մալթերեն նորվեգական
պարսկական Լեհաստանի պորտուգալացի ռումինական ռուսական սերբերեն Սլովակիայի Սլովենիայի իսպաներեն սուահիլի շվեդերեն թայերեն թուրքական ուկրաինական ուրդու վիետնամերեն ուելսերեն հայերեն bengali բոսնիերեն
Cebuano Esperanto գուջարաթի հաուսա Hmong Igbo ճավաերեն kannada Khmer Lao լատիներեն մաորի մարաթի մոնղոլական նեպալերեն Punjabi Somali tamil telugu յորուբա
զուլուսերեն
Անգլերեն Французский Немецкий Итальянский Португальский Русский Испанский