Как отловить нажатие на TitleBar ???

← →
Zahar (2004-10-07 20:02) [0]

Хочется выполнить действие Х при нажатии на TitleBar на форме...
Кто знает как ???

← →
Yuri Btr © (2004-10-07 20:07) [1]

Лови сообщение WM_NCHITTEST у своей формы
там есть HTCAPTION

← →
Yuri Btr © (2004-10-07 20:13) [2]

Сорри

.....
public
procedure wmncLButtonUp(var msg: TWMncLBUTTONUP); message wm_NclButtonUp;
.....
procedure TForm1.WmNcLButtonDown(var Msg: TWMNCLBUTTONDOWN);
begin
inherited;
ShowMessage("Title Bar Ckicked !!!");
end;

← →
olookin © (2004-10-07 21:02) [3]

А разве такм нет OnClick?

Пржде чем отвечать - надо думать... Или по крайней мере читать... Я разумел ToolBar... Потому мое предыдущее отменяется...

← →
Zahar (2004-10-07 23:44) [5]

Сработало вот так:
procedure wmncLButtonDown(var msg: TWMncLBUTTONDown); message wm_NclButtonDown; ... procedure TForm1.WmNcLButtonDown(var Msg: TWMNCLBUTTONDown); begin inherited; ShowMessage("Title Bar Ckicked !!!"); end;
Огромное спасибо!

Как отловить нажатие на TitleBar ??? Найти похожие ветки