From e79ea347696ace24847855858dc6933f17e38b16 Mon Sep 17 00:00:00 2001 From: graemeg Date: Thu, 16 Aug 2007 22:25:51 +0000 Subject: * Fixed bug where GFX based applications crashed on run. * Fixed GDI bug where mouse cursor didn't change at the edges of a window. * Fixed a minor bug in the reporting of coordinates in the eventtest example. --- examples/corelib/eventtest/eventtest.lpr | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'examples/corelib/eventtest/eventtest.lpr') diff --git a/examples/corelib/eventtest/eventtest.lpr b/examples/corelib/eventtest/eventtest.lpr index 46556971..326dd277 100644 --- a/examples/corelib/eventtest/eventtest.lpr +++ b/examples/corelib/eventtest/eventtest.lpr @@ -139,7 +139,7 @@ end; procedure TMainForm.MsgMove(var msg: TfpgMessageRec); begin - WriteLn('Window has been moved to ', Left, '/', Top); + WriteLn('Window has been moved to ', msg.Params.rect.Left, '/', msg.Params.rect.Top); end; procedure TMainForm.MsgKeyChar(var msg: TfpgMessageRec); -- cgit v1.2.3-70-g09d2