Einzelnen Beitrag anzeigen

Benutzerbild von Nonsense
Nonsense

Registriert seit: 23. Nov 2002
389 Beiträge
 
Delphi 5 Standard
 
#11

Re: ClientHeight/ClientWidth für WinAPI

  Alt 21. Okt 2004, 22:21
Zitat von teebee:
Ich hätte auch noch was:MSDN-Library durchsuchenAdjustWindowRect

Gruß, teebee
Danke. Ich probiere schon seit Tagen (wenn ich denn Zeit dafür finde), diese Funktion vernpnftig zum laufen zu kriegen. Aber es klappt nicht. Die Maße stimmen überhaupt nicht überein, viel zu klein. Und ich bin mir eigentlich sicher, dass ich es wie in der SDK beschrieben mache.

Delphi-Quellcode:
const
  WND_HEIGHT = 260;
  WND_WIDTH = 340;

[...]

  X := (GetSystemMetrics(SM_CXSCREEN) div 2) - (WND_WIDTH div 2);
  Y := (GetSystemMetrics(SM_CYSCREEN) div 2) - (WND_HEIGHT div 2);

  SetRect(WindowRect, X, Y, WND_WIDTH, WND_HEIGHT);
  AdjustWindowRectEx(WindowRect, dwStyle, False, dwExStyle);

  CreateWindowEx(dwExStyle,
                 CLASS_NAME,
                 WND_TITLE,
                 dwStyle,
                 WindowRect.Left,
                 WindowRect.Top,
                 WindowRect.Right,
                 WindowRect.Bottom,
                 0, 0,
                 hInstance,
                 nil);

(* Anmerkung: WND_HEIGHT / WND_WIDTH beieht sich auf die Maße des Client-Bereiches. Das Ergebnis von AdjustWindowRectEx ist viel kleiner, als die Konstanten *)
Hat jemand eine Idee?
  Mit Zitat antworten Zitat