| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Form [D5]
JLK © (2002-11-07 07:19:00)Можно ли как то передвигать форму не за заголовок, а за Panel?
KoluChi (2002-11-07 13:48:00) [1]SC_MOVE + HTCAPTION = $F012
Сахаров Сергей (2002-11-07 13:01:00) [2]А ещё правильней сделать так:
Обработчик OnLButtonDown:
begin
ReleaseCapture;
SendMessage(Handle,WM_SYSCOMMAND, SC_MOVE + HTCAPTION, 0);
end;
McSimm (2002-11-07 10:15:00) [3]другой вариант - обрабатывать сообщение WM_NCHITTEST.
(более громоздкий, но, IMHO, более правильный)
KoluChi (2002-11-07 09:25:00) [4]Поставь событие у компонента, за который хочешь передвигать форму.
procedure TMainForm.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
ReleaseCapture;
perform(WM_SysCommand, $F012, 0);
end;
P.S. Люди, читайте FAQи!!!
KSergey (2002-11-07 08:48:00) [5]Яndex - найдется все. Прямо по вашему запросу.
| |
