Hi Rainer -
You said you found something, but in case you wanted to try ExeStamp,
here's the basic example:
program TinyDE; //- tiniest example of DatedExe
{$apptype console}
uses SysUtils, ExeStamp;
function GetMemoryImageTimeStamp : string;
var
dt : TDateTime;
begin
dt := FileDateToDateTime( GetExeTimeStamp( pointer( HInstance ) ) );
Result := FormatDateTime( 'yyyy-mm-dd hh:mm:ss', dt );
end;
begin
Writeln( 'Tiny DatedExe! compiled: ', GetMemoryImageTimeStamp );
end.
You can get ExeStamp.pas at http://www.mindspring.com/~tfiske/delphi.html.
- Todd
Rainer von Saleski <[EMAIL PROTECTED]> wrote on Fri, 28 Oct 2005 13:29:27 -0400:
> How does a running Delphi program access the date of its compilation?
> Rainer
> _______________________________________________
> Delphi mailing list -> [email protected]
> http://www.elists.org/mailman/listinfo/delphi
_______________________________________________
Delphi mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi
