data e hora do executavel

26/03/2006

pessoal, como faço para pegar a date e a hora de um executável...?

quero pegar isso usando o delphi.


Rafael Santana

Respostas

26/03/2006

Paullsoftware

eu uso essa função, mais ela não funcionou comigo no win9x
function ChecaDataExe(Arquivo: String): String;
var
FHandle: integer;
begin
if not fileexists(Arquivo) then
  begin
  Result := ´Arquivo não encontrado!´;
  end
else
  begin
  FHandle := FileOpen(Arquivo, 0);
  try
  Result := DateTimeToStr(FileDateToDateTime(FileGetDate(FHandle)));
  finally
  FileClose(FHandle);
  end;
  end;
end;
:wink:


Responder Citar

26/03/2006

Massuda

Se você quer a data e hora que um executável foi gerado (compilado), dê uma olhada [url=http://forum.clubedelphi.net/viewtopic.php?t=58434]neste tópico[/url]


Responder Citar