CreateForm с параметром Hide

← →
Turbid © (2004-05-28 13:26) [0]

Мне нужно чтобы программа при запуске пряталась из панели задач.
Для этого я использую при событии CreateForm Form.Hide, но она не прячется, хотя если Form.Hide привязать к нажатию кнопки, то все работает нормально. В чем проблемма?

← →
Петров Денис © (2004-05-28 13:29) [1]

Из панели задач или с экрана?

← →
Turbid © (2004-05-28 13:31) [2]

С экрана прячется Apllication.Minimize - тут все нормально. А с панели не хочет.

← →
Петров Денис © (2004-05-28 13:35) [3]

перегрузи у формы CreateParams, и в ней отключи доп. стиль WS_EX_APPWINDOW

← →
Turbid © (2004-05-28 13:38) [4]

Извини, но как это "прегрузи CreateParams"?

>>Turbid © (28.05.04 13:38) [4]

TForm1 = class(TForm) // ... protected procedure CreateParams(var Params: TCreateParams); override; end;

Сорри, прогнал.
Точнее, тебе надо изменить доп. стиль у окна приложения, что-то вроде этого:
procedure TForm1.FormCreate(Sender: TObject); var Long: Integer; begin Long := GetWindowLong(Application.Handle, GWL_EXSTYLE); Long := Long or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW; SetWindowLong(Application.Handle, GWL_EXSTYLE, Long); end;

CreateForm с параметром Hide Найти похожие ветки