![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как ограничить движение курсора мыши? [D6, Win95/98]
DiHLoS © (2002-10-28 20:46:00)Доброго времени суток!
Как огарничить движение курсора мыши в пределах определенного компонета?
Например, курсор может двигаться только по Panel. Как?
Заранне спасибо...
mukha (2002-10-28 22:23:00) [1]Ограничение перемещения курсора пределами формы:
procedure TForm1.FormCreate(Sender: TObject);
var
aRect:TRect;
begin
Form1.BorderStyle:=bsSingle;
GetWindowRect(Handle, aRect);
ClipCursor(@aRect);
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
ClipCursor(nil);
end;
Shadow (2002-10-28 20:50:00) [2]GetCursorPos
SetCursorPos
ClipRect вроде..