Új hozzászólás Aktív témák

• #1313 Jester01 veterán föccer #1312

  Új Válasz 2006-11-07 15:09:11 #1313

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Jester01

  veterán

  válasz föccer #1312 üzenetére

  Ez a dátumot FileDate formában adja vissza, vagyis kell egy FileDateToDateTime() függvényhívás is.
  
  A gugli a barátod
  MOD: meg hát ott van az általam linkelt oldalon a példa
  
  [Szerkesztve]

• #1311 Jester01 veterán föccer #1309

  Új Válasz 2006-11-06 14:43:45 #1311

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Jester01

  veterán

  válasz föccer #1309 üzenetére

  Igen, van. Úgy hívják, hogy FileAge [link].
  Csak azt nem tudom, 3.1-es Delphiben van-e.

• #1310 ViragL tag föccer #1309

  Új Válasz 2006-11-06 10:27:07 #1310

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  ViragL

  tag

  válasz föccer #1309 üzenetére

  A gugli a programozók nagy barátja
  Jut eszembe: nem próbáltam ki, az rád vár.

• #1308 ViragL tag föccer #1307

  Új Válasz 2006-11-06 10:17:52 #1308

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  ViragL

  tag

  válasz föccer #1307 üzenetére

  Forrás: Jon Erik Oterhals Utolsó módosítás: 1998. december 17.
  A fájl utolsó hozzáférésének (használatának) időpontját az alábbi eljárással tudod megjeleníteni. (A kérdéses fájl nevét (elérési útját) az AnyFile.FIL helyére kell behelyettesíteni.)
  procedure TForm1.Button1Click(Sender: TObject);
  
  var
  FileHandle : THandle;
  LocalFileTime : TFileTime;
  DosFileTime : DWORD;
  LastAccessedTime : TDateTime;
  FindData : TWin32FindData;
  
  begin
  
  FileHandle := FindFirstFile('AnyFile.FIL', FindData);
  
  if FileHandle <> INVALID_HANDLE_VALUE then
  
  begin
  
  Windows.FindClose(Handle);
  
  if (FindData.dwFileAttributes and
  FILE_ATTRIBUTE_DIRECTORY) = 0 then
  
  begin
  
  FileTimeToLocalFileTime(FindData.ftLastWriteTime,
  LocalFileTime);
  
  FileTimeToDosDateTime(LocalFileTime,
  LongRec(DosFileTime).Hi,LongRec(DosFileTime).Lo);
  
  LastAccessedTime := FileDateToDateTime(DosFileTime);
  
  Label1.Caption := DateTimeToStr(LastAccessedTime);
  
  end;
  
  end;
  
  MOD: gugli tudja
  
  [Szerkesztve]

• #1121 RAM őstag föccer #1120

  Új Válasz 2006-02-17 18:10:32 #1121

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  RAM

  őstag

  válasz föccer #1120 üzenetére

  , mostmár jobban tudom mi az a de bogarizáló.
  
  Más:
  
  Mikor elmenteni a dolgokat?
  Van egy olyan érzésem, hogy elrontja, ha nyitogatok-szóval ki-be járkálok a fájlokkal, közben pas-t, unit-ot, form-ot szerkesztek, mialatt futtatok, dpr -re kattanok, és bekattanok, mert olyan kerül a programomba, amit ki nem tudok szedni, mert teljesen átláthatatlanná teszi a programot....
  
  Írjátok le légyszíves mikor kell OK-t nyomni, amikor ajánlja a Mentést? (Nekem mindig ész nélkülinek tűnik, hogy ajánlja, van, amikor persze tovább sem enged, ha nem mentem...)
  Az Office mentését értem, de ezt, hát.......
  
  Pancser(Kezdő) szinten vagyok még. {Észkerék from 90-es évek rulZ }
  
  
  [Szerkesztve]

• #1117 RAM őstag föccer #1116

  Új Válasz 2006-02-16 18:42:59 #1117

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  RAM

  őstag

  válasz föccer #1116 üzenetére

  akkor egy nagyon lámaságot kérdezek,
  Mire jó a debugger, csak, hogy tiszta legyen.
  
  Javallot lecserélni?
  
  [Szerkesztve]

Új hozzászólás Aktív témák