Avatar
expoox
Redaktor
Avatar
expoox:

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:

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:

to je presne to co som hladat, dakujem pekne

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

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:

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:

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.