Форум: "Основная";
Поиск по всему сайту: 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.018 c
1-22705           ТеньЛуны              2002-03-26 15:59  2002.04.08  
Библиотеки шифрования


3-22600           a_a_k                 2002-03-18 10:12  2002.04.08  
SQL-запрос


3-22592           Siberia               2002-03-11 17:43  2002.04.08  
использование UPPER в SQL-запросах


4-22879           Sergy                 2002-02-06 10:27  2002.04.08  
Определение загрузки процессора перед запуском проги


3-22573           kolonist              2002-03-17 12:03  2002.04.08  
Как совладать с Index out of date или Index read only?