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

Вниз

Как отобразить не главные окна своей программы в панели задач Win   Найти похожие ветки 

 
Term ©   (2005-07-26 15:34) [0]

Как отобразить не главные окна своей программы в панели задач Windows


 
Чапаев ©   (2005-07-26 15:38) [1]

Добавить стиль WS_EX_APPWINDOW.


 
Term ©   (2005-07-26 15:56) [2]

можно примерчик


 
Term ©   (2005-07-26 16:36) [3]

есть кто живой


 
Lexer ©   (2005-07-26 16:46) [4]

Term: Тебе ведь Чапаев дал ответ [1].
В FormCreate запиндюриваешь вот это:

SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_APPWINDOW);


 
Чапаев ©   (2005-07-26 16:51) [5]

> В FormCreate запиндюриваешь вот это:
Это не есть правильно. Лучше перекрыть CreateParams.

А вот если стиль менять во время работы, то кнопка на панели задач не появляется/прячется... :-(


 
Юрий Зотов ©   (2005-07-26 17:20) [6]

> Чапаев ©   (26.07.05 16:51) [5]

type
 TForm2 = class(TForm)
   procedure FormClose(Sender: TObject; var Action: TCloseAction);
   procedure FormDblClick(Sender: TObject);
 private
   FAppWnd: boolean;
 protected
   procedure CreateParams(var Params: TCreateParams); override;
 end;

procedure TForm2.CreateParams(var Params: TCreateParams);
begin
 inherited;
 if FAppWnd then
   Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW
end;

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 Action := caFree
end;

procedure TForm2.FormDblClick(Sender: TObject);
begin
 FAppWnd := not FAppWnd;
 RecreateWnd
end;


 
Term ©   (2005-07-26 17:24) [7]

спасибо всем


 
Чапаев ©   (2005-07-26 17:35) [8]

> RecreateWnd
Ах, воооооооот оно как! Ну спасибище!



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

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

Наверх




Память: 0.48 MB
Время: 0.046 c
14-1120413328
Soft
2005-07-03 21:55
2005.08.14
Какую CMS использовать?


3-1120745203
VictorT
2005-07-07 18:06
2005.08.14
Имеет ли значение в современных СУБД (в частности MySQL) порядок


4-1118575139
Naphy
2005-06-12 15:18
2005.08.14
Параметр функции GetEnvironmentVariable...


14-1121928072
Noxa
2005-07-21 10:41
2005.08.14
IBExpert. Русский язык интерфейса.


11-1105276208
Э-э-э Вася
2005-01-09 16:10
2005.08.14
Вывод jpeg в MCK (KOL)