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

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

Always on Top [D5, WinME]

e-SiN ©   (2002-03-26 15:32:00) 

Kak coздать дочернее окно, чтобы оно всегда плавало поверх родительского?
P.S.:
"procedure TForm3.CreateParams (var Params: TCreateParams);
begin
Inherited CreateParams(Params);
Params.Style:= Params.Style or ws_OverLapped;
Params.WndParent:=Form1.Handle;
end;
"-неработает, но одна форма уже есть(и на ней роботает:)

---

e-SiN   (2002-03-27 09:46:00) [1]

Извентиляюсь, забыл override в public;)
Public
procedure CreateParams (var Params: TCreateParams);override;
end;

var
Form2: TForm2;

implementation

procedure TForm2.CreateParams (var Params: TCreateParams);
begin
Inherited CreateParams(Params);
Params.Style:= Params.Style or ws_OverLapped;
Params.WndParent:=Form1.Handle;
end;

---

e-SiN   (2002-03-27 09:40:00) [2]

Неработает:(((((((((

---

Eug201   (2002-03-26 18:35:00) [3]

Я посмотрел справку - ws_overlapped вроде не множко не то. Попробуй WS_EX_TOPMOST и посмотри WIN_SDK по CreateWindowEx.

---

Наверх