Diskuze: Posledna zmena suboru

Ostatní jazyky Delphi Delphi (Pascal) Posledna zmena suboru

Aktivity (1)
Avatar
expoox
Redaktor
Avatar
expoox:9.10.2013 20:21

Zdravim, potreboval by som poradit ako prehladavat danu zlozku a zistit datum poslednej zmeny kazdeho suboru v nej a ten datum porovnavat s aktualnym datumom, dakujem

 
Odpovědět 9.10.2013 20:21
Avatar
Martin Dráb
Redaktor
Avatar
Martin Dráb:10.10.2013 21:27

Pokud to potřebuješ na Windows, tak:
FindFirstFile, FindNextFile a FindClose ti dovolí procházet soubory a adresáře v zadané složce, přičemž ti o nich řeknou i datum oslední změny (LastWriteTime).

Aktuální čas půjde zjistit přes GetSystemTime, SystemTimeToLo­calTime a SystemTimeToFi­leTime. Nebo tak nějak se ty rfunkce jmenují.

Nahoru Odpovědět 10.10.2013 21:27
2 + 2 = 5 for extremely large values of 2
Avatar
expoox
Redaktor
Avatar
expoox:11.10.2013 14:06

to je presne to co som hladat, dakujem pekne

 
Nahoru Odpovědět 11.10.2013 14:06
Avatar
expoox
Redaktor
Avatar
expoox:11.10.2013 17:09

este mam jeden problem: http://paste.debian.net/56116/ , na riadku 29 na searchResult.name mi hadze chybu: Error: Incompatible type for arg no. 1: Got "AnsiString", expected "PChar" ... neviem si s tym rady, chapem co ma za problem ale neviem ako ho vyriesit, dakujem

 
Nahoru Odpovědět 11.10.2013 17:09
Avatar
expoox
Redaktor
Avatar
expoox:11.10.2013 17:28

ok, mam chybu, trebalo pouzit SysUtils.Dele­teFile();

 
Nahoru Odpovědět 11.10.2013 17:28
Avatar
Martin Dráb
Redaktor
Avatar
Odpovídá na expoox
Martin Dráb:12.10.2013 19:40

Já obvykle používám takovéto řešení problému:

DeleteFile(PAnsiChar('jmeno_souboru'));

(PChar by měl být to samé jako PAnsiChar, možná v Unicode verzi Delphi to už ale bude jinak).

Ale i tka se lehce divím, protože jsem měl dojem, že řetězcové literály to umělo konvertovat do požadovaného typu implicitně.

Nahoru Odpovědět 12.10.2013 19:40
2 + 2 = 5 for extremely large values of 2
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 6 zpráv z 6.