Hello Jeremy, you wee beauty it works:
  with TVersionInfo.Create(Application.ExeName) do
  try
  caption := 'B4WinXP ' +Fileversion;     //not regform.caption
  finally free;
  end;

Thanks!
Al+

---------------------------------------------------------------------------
    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/

Reply via email to