![]() ![]() We see that we get the correct coordinates. So, minimize the IDE and we see the desktop in the background and do the same thing. OK, maybe it is related to conversation between screen and client coordinates. The X and Y coordinates are different when we go out of the Form. When we run the application with the Delphi IDE in the background and click the right mouse button and move right, we see the following: X = 218 Y = 228 The strange things occur when the mouse leaves the Panel Form. When we click a mouse button on the Panel, we receive mouse messages until the button is released. We have a simple Form with a ListBox for logging, and a Panel. Procedure TForm2.Panel1MouseUp(Sender: TObject Button: TMouseButton ![]() If FStartLog then (Format('X = %d Y = %d', )) ![]() Procedure TForm2.Panel1MouseMove(Sender: TObject Shift: TShiftState X, Procedure TForm2.Panel1MouseDown(Sender: TObject Button: TMouseButton Procedure Panel1MouseUp(Sender: TObject Button: TMouseButton Procedure Panel1MouseDown(Sender: TObject Button: TMouseButton Procedure Panel1MouseMove(Sender: TObject Shift: TShiftState X, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, Vcl.StdCtrls Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, I have found a very strange Delphi IDE behavior related to cursor position. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |