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

Вниз

Прикрепление одной формы к другой   Найти похожие ветки 

 
Андрей_СК   (2005-06-30 12:09) [0]

Здравствуйте, уважаемые мастера!!!Помогите пожалуйста. Не получается сделать вот такую штуку: после нажатия кнопки на главной форме появляется вторая форма под главной - это ясно как день, вопрос в другом - как при перетаскивании главной формы по экрану, вторая форма прикреплялась к главной и тянулась за ней, как в Winamp"e перетаскивается Winamp Playlist при перемещении по экрану.


 
Игорь Шевченко ©   (2005-06-30 12:11) [1]

обрабатывать WM_WINDOWPOSCHANGING не поможет ?


 
Kolan ©   (2005-06-30 12:20) [2]

Поищи в нете. Там полно на разных сайтах. Если ненайдёшь вечером скину пример...


 
Чапаев ©   (2005-06-30 12:43) [3]

Посмотри исходники JEDI VCL. Там есть компонентик Magneto Form...


 
Андрей_СК   (2005-06-30 12:44) [4]

Спасибо Вам!!! Разбираюсь с WM_WINDOWPOSCHANGING.


 
Игорь Шевченко ©   (2005-06-30 13:00) [5]

Еще так можно:

unit main;

interface
uses
 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
 TfMain = class(TForm)
 private
   procedure WMMove (var Message: TWmMove);
     message WM_MOVE;
   procedure UpdateChildPos;
 end;

var
 fMain: TfMain;

implementation
uses
 Child;

{$R *.DFM}

{ TfMain }

procedure TfMain.UpdateChildPos;
begin
 if Assigned(fChild) then begin
   fChild.Left := Left;
   fChild.Top := Top + Height;
 end;
end;

procedure TfMain.WMMove(var Message: TWmMove);
begin
 inherited;
 UpdateChildPos;
end;

end.



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

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

Наверх




Память: 0.47 MB
Время: 0.031 c
3-1118094997
Andy Nortsov
2005-06-07 01:56
2005.07.18
выбор полей связанных по FK


3-1117804272
RavenD
2005-06-03 17:11
2005.07.18
BCD, Float или что то ещё?


14-1119363167
Игорь Шевченко
2005-06-21 18:12
2005.07.18
Ищутся компоненты для работы с протоколом SMPP


1-1119878055
Begin
2005-06-27 17:14
2005.07.18
Список полей класса. Можно как то получить в runtime?


14-1119942538
Vlad Oshin
2005-06-28 11:08
2005.07.18
Вчера умерла жена Цоя. Будут ли кино-пробы 2?