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

Вниз

Окно поверх панели задач   Найти похожие ветки 

 
NorthMan ©   (2004-06-17 15:29) [0]

Можно ли как-нибудь поместить окно поверх панели задач?
Делаю SetWindowPos(Application.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOACTIVATE); - не помогает. Пытаюсь спрятать taskbar
ShowWindow(FindWindow("Shell_TrayWnd",nil), SW_HIDE); - тоже не помогло. Taskbar пропал, а мое окно все равно обрезано на высоту taskbar"a.


 
Игорь Шевченко ©   (2004-06-17 16:32) [1]

Сними у Taskbar флажок "Всегда сверху"


 
NorthMan ©   (2004-06-17 16:59) [2]

А на другой машине кто флажок снимать будет?


 
Kair ©   (2004-06-17 17:16) [3]

Думаю, этот параметр должен быть записан в реестре...


 
NorthMan ©   (2004-06-17 17:26) [4]

Да не хотелось бы в реестре гадить, а то при нестандартном завершении вернуть все на свои места не получиться...


 
DeadMeat ©   (2004-06-17 17:43) [5]

А ты попробуй вызывать её в таймере (ну или в потоке)...

---
...Death Is Only The Begining...


 
Snap ©   (2004-06-17 21:50) [6]

Как нибудь можно. Определённые проги такое делают, сам видел.


 
NorthMan ©   (2004-06-18 08:00) [7]

В том-то и дело. Ведь сама-то она использует эти функции.


 
grom   (2004-06-18 10:36) [8]

var
 Form1: TForm1;
   Cor : TRect;   // TaskBar
 hButton : THandle;      //pusk
 HTaskBar :THandle;     //Taskbar
-------------------------------------
procedure TForm1.Timer1Timer(Sender: TObject);
begin
 Timer1.Interval:=100;
SetWindowPos(Form1.Handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE+SWP_NOSIZE);
hTaskBar := FindWindow("Shell_TrayWnd",nil);
hButton:= GetWindow(hTaskBar, GW_CHILD);
GetWindowRect(HTaskBar,Cor);
Form1.Top:=Cor.Top-10;
Form1.Left:=Cor.Left+10;
end;
может это поможет



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

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

Наверх




Память: 0.48 MB
Время: 0.052 c
1-1089757292
sashapont
2004-07-14 02:21
2004.08.01
Ввод в Edit в формате 10:33:41


4-1087374976
DFF
2004-06-16 12:36
2004.08.01
API : Длинна текста и смена шрифта


1-1090348862
Евгений ,лучше женя
2004-07-20 22:41
2004.08.01
Как в Delphi можно вставить анимированый gif-рисунок в роли банер


4-1086624324
killer
2004-06-07 20:05
2004.08.01
Браузер установленный по умолчанию


1-1090147767
Phoenix
2004-07-18 14:49
2004.08.01
Invalid pointer operation