Скачать: CL | DM;

---|Ветка была без названия|---   Найти похожие ветки 

← →
Hooch ©   (2003-05-19 13:15) [0]

День добрый, Господа !
никак не могу решить проблему: нужно что б "дочерняя" форма "плавала" на "родительской" и не уходила за её пределы, т.е. аналог MDI форм, что б реализовать "плавание" делаю так


with Params do begin
Style := Style or WS_OVERLAPPED;
WndParent := Application.MainForm.Handle;
end;


но никак не получается сделать что б форма не уходила за пределы "родительской" если задать Parent, то начинаются проблемы с фокусом, если задать ManualDock(ParentForm), исчезает заголовок у дочерней формы, как быть то ?

---

← →
Skier ©   (2003-05-19 13:25) [1]

В экранные координаты переводишь ?

---

← →
Hooch ©   (2003-05-19 13:30) [2]

в смысле ?

---

← →
Юрий Зотов ©   (2003-05-19 13:31) [3]

procedure TForm1.Button1Click(Sender: TObject);
begin
with TForm2.Create(Self) do
begin
Parent := Self;
Show
end
end;

И все. Проблем с фокусом не обнаружено.

---

← →
Skier ©   (2003-05-19 13:33) [4]

WinAPI - ClientToScreen(...)

---

← →
Hooch ©   (2003-05-19 13:38) [5]

>> Юрий Зотов ©
например: бросьте на Form2 TEdit и попробуйте в него попасть левым кликом мыши, у меня не получается :-(

---

← →
Hooch ©   (2003-05-19 13:47) [6]

>> Skier ©
предлагаете WM_GETMINMAXINFO отслеживать ?

---

← →
Skier ©   (2003-05-19 13:51) [7]

WM_MOVING
WM_SIZING
WM_SYSCOMMAND

---

← →
Hooch ©   (2003-05-19 13:55) [8]

>> Skier ©
а проще нет способа :-)

---

← →
Skier ©   (2003-05-19 14:02) [9]

>Hooch © (19.05.03 13:55)
Конечно есть ! см. Юрий Зотов © (19.05.03 13:31)

---

← →
Hooch ©   (2003-05-19 14:03) [10]

>> Skier ©
это не прокатит, см. мои коментарии ниже :-)

---

← →
Skier ©   (2003-05-19 14:05) [11]

>Hooch © (19.05.03 14:03)
Ну и...какой делаем вывод ? :)

---

← →
Hooch ©   (2003-05-19 14:08) [12]

>> Skier ©
либо писать на MDI либо застрелится :-))

---

← →
Юрий Зотов ©   (2003-05-19 14:18) [13]

> Hooch © (19.05.03 13:38)

Хм... а ведь и у меня не получилось. Значит, ручками. Только, думаю, можно отследить размеры и позицию в одном обработчике WM_WINDOWPOSCHANGING. А WM_SYSCOMMAND потребуется для обработки сворачивания-разворачивания и т.п.

---

← →
Hooch ©   (2003-05-19 14:26) [14]

ну что ж, всем спасибо, бум писать ручками :-)

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.012 c