Текущий архив: 2003.04.21;
Скачать: CL | DM;

Вниз

Таскание окна за любое место   Найти похожие ветки 

← →
unknown   (2003-04-11 11:35) [0]

Таскание окна за любое место

Как сделать так, чтобы окно моей программы можно было таскать не только за заголовок, но и за любой отведенный для того компонент (например, за созданную на этой форме панель)?

---

← →
DVM ©   (2003-04-11 11:38) [1]

http://shival.chat.ru/ifth2.htm

---

← →
LEON   (2003-04-11 16:19) [2]


TAForm = class(TForm)
....
private
procedure WMNCHitTest(var Message: TWMNCHitTest) message WM_NCHITTEST;
....
....
implementation
procedure TAForm.WMNCHitTest(var Message: TWMNCHitTest);
begin
Message.Result := HTCAPTION
end;

---

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

Текущий архив: 2003.04.21;
Скачать: CL | DM;

Наверх

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