Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Тащим форму


**** ©   (2002-09-13 14:40:00) 

Подскажите, пожалста. Вроде частый вопрос, но в поиске ничего не нашел..
Как сделать, что бы можно было таскать форму не только за заголовок???


****   (2002-09-13 15:06:00) [1]

спасибо, помогло


Trof   (2002-09-13 15:03:00) [2]

Например:
procedure TfmAdv.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if ssLeft in Shift then
begin
ReleaseCapture;
Perform(WM_SYSCOMMAND,$F012,0);
end
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо