Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.029 c