I am using Lazarus 32 bit on a Win64 Windows 7 machine. On a 32bit machine the simple test app ran without any problems, when I run on my new 64bit machine I get the error
Project X raised exception class 'RunError(219)'
In file 'c:\etc\etc\AgkPas\Source\AGKPlatform_Win.pas' at line 174:
App := TAgkApplication(TAgkApplication.Instance);
EInvalidCast
If I change AGKPlatform_Win.pas line 174 to include either of these commented out lines I get an assertion failure / cast exception
procedure TAgkPlatformWindows.Run;
var
App: TAgkApplication;
begin
//Assert(App is TAgkApplication);
//App := TAgkApplication.Instance as TAgkApplication;
App := TAgkApplication(TAgkApplication.Instance);
And now without altering any code it works. How odd