Советы начинающим




Как вывести окно перед другими окнами не выводя наверх родительское окно?


Если это не мешает общему ходу программы, то одно из самых простых решений - использование рабочего стола (Desktop) как родительское окно. Для этого необходимо перекрыть CreateParams подчиненного окна следующим образом:

...

private

procedure CreateParams(var Params: TCreateParams); override;

...

procedure TForm2.CreateParams(var Params: TCreateParams);

begin

inherited CreateParams(Params); Params.WndParent := GetDesktopWindow; end;








Содержание  Назад  Вперед