A wild stab in the dark, but try:
[pascal]
with ScreenToClient(Mouse.CursorPos) do begin
Left := X;
Top := Y;
end;
[/pascal]
Failing that, try using the API ScreenToClient directly.
A wild stab in the dark, but try:
[pascal]
with ScreenToClient(Mouse.CursorPos) do begin
Left := X;
Top := Y;
end;
[/pascal]
Failing that, try using the API ScreenToClient directly.
[size=10px][ Join us in #pgd on irc.freenode.net ] [ Sign the Petition for a Software Patent Free Europe ][/size]
Bookmarks