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

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

Проблема при работе с формами [D6, D7, WinXP]

ArchValentin ©   (2005-02-23 17:51:00) 

Люди, помогите. Как сделать так чтобы когда сворачиваешь главную форму, побочная оставалась на виду и была полностью работоспособной?
Вызываю по Form2.show;

---

easy   (2005-02-25 09:17:00) [1]

type
 TForm2 = class(TForm)
 private
   { Private declarations }
   procedure CreateParams(var Params: TCreateParams); override;
 public
   { Public declarations }
 end;

.....

procedure TForm2.CreateParams(var Params: TCreateParams);
begin
 inherited;
 Params.WndParent:=0;
 Params.ExStyle:=Params.ExStyle or WS_EX_TOOLWINDOW or WS_EX_TOPMOST;
end;

---

olookin   (2005-02-25 08:38:00) [2]

Application.OnMinimize:=MyOnMinimize;

procedure TMyForm.MyOnMinimize(Sender: TObject);
begin
 SecondWindow.Show;
 ShowWindow(SecondWindow.Handle,SW_SHOW);
end;

---

ArchValentin   (2005-02-25 03:05:00) [3]

> olookin ©   (23.02.05 18:17) [5]

Ловлю, ловлю, ловлю...поймал...:))) Поймать то поймал, обрабатываю
<CODE

>  subform.show;
>  mainform.Hide;
>
<
но прикол то в том что форма всё равно сворачивается, а с ней и побочная :(((
пытался сделать
MainForm.restore;
SubForm.show;
MainForm.hide;
работает, но ОЧЕНЬ некрасиво.

---

olookin   (2005-02-23 18:17:00) [4]

[4] ArchValentin ©   (23.02.05 18:14)

Ну засуньте ваш код в обработчик сообщений. И ловите сворачивание главного окна, а потом делайте (если поймали) то, что требуется.

---

ArchValentin   (2005-02-23 18:14:00) [5]

> olookin ©   (23.02.05 18:08) [3]

...может я неправильно выразился, юзер нажал на свернуть, MainFormсвернулась, а subformосталась на виду

---

olookin   (2005-02-23 18:08:00) [6]

procedure TForm1.Button1Click(Sender: TObject);
begin
 subform.show;
 mainform.Hide;
end

---

ArchValentin   (2005-02-23 18:07:00) [7]

> Юрий Зотов ©   (23.02.05 17:55) [1]

пишу плавающий мониторчик к своей проге, а он должен быть всегда наверху, независимо от того, свёрнута прога или нет

---

Юрий Зотов   (2005-02-23 17:55:00) [8]

Зачем?

---

Наверх