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

Отловить событие формы при перетаскивании ее за Caption ???   Найти похожие ветки 

← →
ЮРИЙ_К ©   (2003-03-25 16:51) [0]

Коллеги, как САБЖ в конце перетаскивания ?

---

← →
Clickmaker ©   (2003-03-25 16:53) [1]

WM_MOVE

---

← →
ЮРИЙ_К ©   (2003-03-25 16:57) [2]

>> Clickmaker это не стандартное ? Как его прикрутить?

---

← →
Clickmaker ©   (2003-03-25 17:05) [3]

type
TYourForm = class
...
procedure WMMove(var Message: TMessage); message WM_MOVE;

---

← →
ЮРИЙ_К ©   (2003-03-26 08:58) [4]

>> Clickmaker

Проверил, получилось, однако WM_MOVE отслеживает слишком оперативно, при открытии формы сработало 3 раза. Это не совсем то, мне нужно было, что-бы только тогда, когда ша шапку таскаешь, и причем в конце. ВО надыбал в Кулибе, именно то, что нуно 8-). Кому надо - пользуйтесь
public
procedure WMEXITSIZEMOVE(var Message: TMessage);
message WM_EXITSIZEMOVE;

procedure TForm1.WMEXITSIZEMOVE(var Message: TMessage);
begin
Form1.Caption := "Finished Moving and sizing";
end;

---

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

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



Память: 0.45 MB
Время: 0.012 c