Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Вниз

Always on Top 


e-SiN   (2002-03-26 15:32) [0]

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;
"-неработает, но одна форма уже есть(и на ней роботает:)



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

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



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

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



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

Извентиляюсь, забыл 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;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.025 c
1-22686           Goblinus              2002-03-26 13:44  2002.04.08  
ComboBox


1-22663           snoup                 2002-03-28 10:50  2002.04.08  
А как сделать так что бы например когда я запускаю таймер сек. ме


1-22724           Rammst                2002-03-26 06:54  2002.04.08  
Часы


1-22662           ruslan_as             2002-03-28 11:19  2002.04.08  
просуммировать ClientDataSet


1-22634           dymka                 2002-03-27 14:11  2002.04.08  
Про отчеты.