I was using this code below:
procedure Tfrmmenu.FormShow(Sender: TObject);
begin
fileversioninfo := TFileVersionInfo.Create(nil);
fileversioninfo.fileName := Application.ExeName;
frmmenu.Caption := 'Sistema Teste' + ' - Ver. ' +
FileVersionInfo.getVersionSetting('FileVersion');
sysversao := 'versão. ' +
FileVersionInfo.getVersionSetting('FileVersion');
end;
To get the version of the executable, now with the
[Lazarus-1.1-40312-fpc-2.7.1-20130214-win32] not working anymore, the
error message appears below, with Lazarus 1.06 and fpc 2.6, works normal :
Error: identifier idents in member "getVersionSetting"
What can it be?
Edson
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
