Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как ограничить движение курсора мыши? [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 вроде..


Наверх

Титульная страница Поиск, карта сайта Написать письмо