Форма, которая всегда сверху .

← →
Nemo (2003-02-21 02:06) [0]

Как сделать, чтобы форма была, так сказать, "всегда сверху"? Заранее благодарен.

← →
dimich1978 (2003-02-21 09:25) [1]

Чтобы форма была всегда поверх всех окон:
В обьявлении класса формы переопределяешь виртуальный метод TWinControl CreateParams >>

procedure CreateParams(var Params:TCreateParams);override;

Его реализация:
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.ExStyle:=Params.ExStyle or WS_EX_TOPMOST;
end;

← →
ers (2003-02-21 10:22) [2]

Удалено модератором
Примечание: Задай свой вопрос в отдельной ветке

← →
Nemo (2003-02-22 02:03) [3]

Сам же отвечаю на свой вопрос, но я тут вспомнил, что это можно указать в свойствах формы.

Форма, которая всегда сверху . Найти похожие ветки