Einzelnen Beitrag anzeigen

CalganX

Registriert seit: 21. Jul 2002
Ort: Bonn
5.403 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: Form über Taskleiste anzeigen

  Alt 8. Jul 2004, 21:18
Hi,
Aus meinem dpX-ShoutBox-Reader
Delphi-Quellcode:
  // Höhe der Taskbar erhalten
  SysTray := FindWindow('Shell_TrayWnd', nil);
  if SysTray <> INVALID_HANDLE_VALUE then begin
    if GetWindowRect(SysTray, Rect) then
      iTaskbar := Rect.Bottom-Rect.Top;
  end;

  // Bildschirmmaße erhalten
  iScreenHeight := Screen.Height;
  iScreenWidth := Screen.Width;

  // direkt über der Uhr platzieren
  self.Top := (iScreenHeight - iTaskbar) - self.Height;
  self.Left := iScreenWidth - self.Width;

Ich denke das sollte helfen.

Chris
  Mit Zitat antworten Zitat