А если делать в OnClick, то можно сделать так:
Код:
var
CPos: TPoint;
begin
...
GetCursorPos(CPos);
ScreenToClient(CPos);
...
end;
__________________
Что делать, когда сломался комп:
1. Если вы юзер - делать ноги.
2. Если ремонтник - делать деньги.
3. Если вы программист - делать вид, что так было задумано.
|