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

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

← →
Red - Dragon   (2004-06-15 22:06) [0]

Здравствуйте - я хочу сделать так, чтобы у моей программы в WinXP не было синей полоски вверху(за которую можно таскать), а сделать свою панель и чтобы программа таскалась именно за эту панель.

---

← →
grom   (2004-06-16 11:10) [1]

procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
Perform(WM_SYSCOMMAND, $F012, 0);
end;

---

← →
Red - Dragon   (2004-06-16 21:28) [2]

grom - искреннее спасибо!

---

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

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



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