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

Вниз

Как убрать кнопку на панели задач?   Найти похожие ветки 

 
demon ©   (2008-08-01 02:07) [0]

Программа на API.
При  ShowWindow(Handle, SW_HIDE) убирается вместе с окном.

А может можно чтобы окно сразу создавалось без кнопки на панели задач?

hInst:=GetModuleHandle(nil);
 with wClass do
 begin
   Style:=         CS_PARENTDC;
   hIcon:=         LoadIcon(hInst,"MAINICON");
   lpfnWndProc:=   @WindowProc;
   hInstance:=     hInst;
   hbrBackground:= CreateSolidBrush(COLOR_MAIN_PANEL);
   lpszClassName:= "test Class";
   hCursor:=       LoadCursor(0,IDC_ARROW);
 end;

 windows.RegisterClass(wClass);

 Handle:=CreateWindowEx(
   WS_EX_TOPMOST,
   "test Class",          
   "--------",          
   WS_POPUP or        
   WS_VISIBLE,              
   0,                      
   0,                        
   MainBarMax,          
   MainBarHight,    
   0,                    
   0,                      
   hInst,              
   nil);                  

       ShowWindow(Handle, SW_HIDE);    // эта страка убирает кнопку вместе с окном...


 
KilkennyCat ©   (2008-08-01 02:12) [1]

А зачем этот код?


 
demon ©   (2008-08-01 02:16) [2]

Ну, так я делал окно, может я чего не так в нем прописал.


 
KilkennyCat ©   (2008-08-01 02:17) [3]

WS_EX_TOOLWINDOW добавьте


 
demon ©   (2008-08-01 02:23) [4]

:))) Заработало!
Спасибо!



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

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

Наверх




Память: 0.47 MB
Время: 0.146 c
15-1216902649
DevilDevil
2008-07-24 16:30
2008.09.14
можно ли как то в опциях Delphi-проекта указать выходное имя *.ex


8-1185571678
megajober3d
2007-07-28 01:27
2008.09.14
Как в Delphi получить из BMP файл GIF но "прозрачный"...


15-1216813232
Сергей М.
2008-07-23 15:40
2008.09.14
Абракадабра в vCard - с каким бубном вокруг нее попрыгать ?


15-1216808213
Vlad Oshin
2008-07-23 14:16
2008.09.14
V:Variant; В чем разница? V:=varEmpty, V:=null, V := Unassigned;


6-1193084081
Oleg
2007-10-23 00:14
2008.09.14
Проблема с работой сервера (TWSocket) в сервисе