Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.06.13;
Скачать: CL | DM;

Вниз

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"?


 
VMcL ©   (2004-05-28 13:50) [5]

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

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


 
Петров Денис ©   (2004-05-28 13:55) [6]

Сорри, прогнал.
Точнее, тебе надо изменить доп. стиль у окна приложения, что-то вроде этого:

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;



Страницы: 1 вся ветка

Текущий архив: 2004.06.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.033 c
3-1085464710
Andrey_ck
2004-05-25 09:58
2004.06.13
Работа с ADO


1-1085823911
Глеб
2004-05-29 13:45
2004.06.13
Завершение чужой программы после её запуска


1-1086037589
maxXP
2004-06-01 01:06
2004.06.13
Подскажите как реализовать такую фишку.


1-1086171807
Ruslan
2004-06-02 14:23
2004.06.13
Как преобразовать массив байт в строку?


3-1085402689
Cyber
2004-05-24 16:44
2004.06.13
создание Query-запросов