Скачать: CL | DM;

мышка всегда на моей форме   Найти похожие ветки 

← →
vladish   (2002-05-27 18:54) [0]

Привет мастерам и всякому сюда приходящему!

А как сделать чтобы мышка всегда была на моей форме
чтоб нельзя ее было переместить за пределы
(без hook)

Успехов!

---

← →
Song ©   (2002-05-27 18:58) [1]

ClipCursor() вчера был этот вопрос

---

← →
rhf ©   (2002-05-27 18:59) [2]

можно clipCursor, но у меня это приводит к ошибке, по этому поводу тут пару дней назад вопрос весел, не знаю к чему там пришли.........

или попробуй перехватом сообщения WM_MOUSELEAVE и ставь координаты в поле формы

---

← →
Song ©   (2002-05-27 19:00) [3]

2rhf © (27.05.02 18:59)
Всё там работает, никаких ошибок. Ты просто последние несколько ответов не прочитал, там привели пример.

---

← →
rhf ©   (2002-05-27 19:02) [4]

Song, да я знаю....я только начало видел..........

---

← →
eSKey   (2002-05-27 20:59) [5]

может конечно автору это сильно нужно, но лично я программы, которые мне мышь хапают обычно сразу смываю нафиг.

---

← →
SPeller ©   (2002-05-27 21:24) [6]

ClipCursor() всегда вроде работал. Мож чего не так пишешь?

---

← →
mukha ©   (2002-05-27 22:49) [7]

// ограничение области перемещения курсора
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;

При нажатии мышкой на строку заголовка происходит самопроизвольное освобождение курсора. Чтобы курсор был на форме наверняка - стиль формы задай без строки заголовка.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c