Thanks all but never mind found out myself: uses verinfo with TVersionInfo.Create(Application.ExeName) do try Label5.Caption:=label5.Caption+' '+Fileversion; finally free; end;
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
