GetWindowsSysDir
Quais os parametros que eu uso nessa função do windows pra mim usar na expressão abaixo:
Data1:= FileDateToDateTime(FileAge(´WinSysDir´ + teste.ini´));
Data1:= FileDateToDateTime(FileAge(´WinSysDir´ + teste.ini´));
Derodrigo
Curtidas 0
Respostas
Maicongabriel
30/01/2004
Desconheço a função GetWindowsSysDir, mas você pode utilizar uma dessas ::
{ pasta windows }
{ pasta system }
{ pasta windows }
function ExtractWindowsDir : String; var Buffer : Array[0..144] of Char; begin GetWindowsDirectory(Buffer,144); Result := FormatPath(StrPas(Buffer)); end;
{ pasta system }
function ExtractSystemDir : String; var Buffer : Array[0..144] of Char; begin GetSystemDirectory(Buffer,144); Result := FormatPath(StrPas(Buffer)); end;
GOSTEI 0