Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.08.26;
Скачать: CL | DM;

Вниз

Склеить формы.   Найти похожие ветки 

 
AMD   (2007-08-04 13:22) [0]

Здравствуйте!
Есть две формы надо сделать так чтобы когда двигалась одна то за ней двигалась и вторая.Т.е "склеить их" , как в винапе например. Заранее спасибо.


 
Ping   (2007-08-04 13:42) [1]

Можно обрабатывать сообщение WM_MOVE:

TForm1 = class(TForm)
private
 procedure WMMove(var a_Msg: TWMMove); message WM_MOVE;
end;

procedure TForm1.WMMove(var a_Msg: TWMMove);
begin
 if (Form2 <> nil) then
 begin
   Form2.Left := Left;
   Form2.Top := Top + Height;
 end;
end;


 
Eraser ©   (2007-08-04 14:36) [2]

> [0] AMD   (04.08.07 13:22)

в JEDI VCL есть компонент такой, посмотри как сделан.


 
Zagaevskiy ©   (2007-08-04 20:27) [3]


> винапе

винампе?


 
Инс ©   (2007-08-04 20:54) [4]

См функции:

BeginDeferWindowPos
DeferWindowPos
EndDeferWindowPos



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

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

Наверх




Память: 0.47 MB
Время: 0.024 c
1-1181834565
Tack
2007-06-14 19:22
2007.08.26
Как узнать, есть ли в TRichEdit двоичные объекты


2-1185868620
gvozdkoff
2007-07-31 11:57
2007.08.26
добавление строки в файл


2-1186090859
Rumin
2007-08-03 01:40
2007.08.26
как записать clienttoscreen как api функцию


11-1154451905
Stargazer
2006-08-01 21:05
2007.08.26
MDI глючит


15-1185829929
DillerXX
2007-07-31 01:12
2007.08.26
Я сделал это! Никто не хочет померяться у кого меньше? ;)