GetWindowsSysDir

Delphi

30/01/2004

Quais os parametros que eu uso nessa função do windows pra mim usar na expressão abaixo:

Data1:= FileDateToDateTime(FileAge(´WinSysDir´ + teste.ini´));


Derodrigo

Derodrigo

Curtidas 0

Respostas

Maicongabriel

Maicongabriel

30/01/2004

Desconheço a função GetWindowsSysDir, mas você pode utilizar uma dessas ::

{ 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
POSTAR