Форум: "Основная";
Текущий архив: 2004.05.23;
Скачать: [xml.tar.bz2];
ВнизПередвижение формы Найти похожие ветки
← →
DRUID (2004-05-03 18:40) [0]Есть такая проблема есть первая форма нестандартной формы, я создал вторую форму, вопрос вот в чем, 1. Мне нужно что бы вторая форма двигалась вслед за первой и 2. Что бы вторую форму нельзя было двигать отдельно от второй
← →
Gero © (2004-05-03 21:36) [1]Обрабатывайте WM_WINDOWPOSCHANGING для обеих форм.
При WM_WINDOWPOSCHANGING для первой формы двигайте вторую, а для второй Result := 0.
← →
DRUID (2004-05-04 07:32) [2]А еще какие нить варианты существуют?
← →
uny (2004-05-04 07:48) [3]есть, формы неправильного вида - круглые, с дыркой и т.д. - на вид будет две формы, а на самом деле это одна)
← →
DRUID (2004-05-04 10:39) [4]>> uny (04.05.04 07:48) [3]
есть, формы неправильного вида - круглые, с дыркой и т.д. - на вид будет две формы, а на самом деле это одна)
Этот вариант я тоже уже рассматривал, но просто получается что форма не круглая и не мгногоугольная, а ваще непонятно что, поэтому необходимо именно перетаскивать две формы. Нашел компонент MagnetFrom мож кто пользовался, дело еще вот в чем, формы находяться на небольшом расстоянии друг от друга.
← →
Gero © (2004-05-04 10:41) [5]
> А еще какие нить варианты существуют?
А чем [1] не подходит?
← →
DRUID (2004-05-04 11:11) [6]>> Gero © (04.05.04 10:41) [5]
> А еще какие нить варианты существуют?
А чем [1] не подходит?
Вот я щас на работе сижу и у меня нет возможности попробовать вариант 1, и я сразу же узнаю другие возможные решения, чего ту непонятного
← →
spogi (2004-05-05 02:08) [7]а так нельзя что ли? пусть будет Drag:Boolean;
перетаскивание будет с помошью:
begin
releaseCapture;
Form1.Perform(WM_SYSCOMMAND,$F012,0);
end;
Form1->OnMouseDown
Drag:=True;
Form1->OnMouseMove
If Drag = True then begin
Form2.Left:=Form1.Left;
Form2.Top:=Form1.Top;
end;
Form1->OnMouseUp
Drag:=False;
← →
DRUID (2004-05-05 12:05) [8]Спасибо всем большое за помощь, разобрался!!!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.05.23;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.03 c