Erkennen ob XP-Stil aktiviert ist

[fsc]

Hallo!

Ich würde gern wissen, ob es eine Möglichkeit gibt herauszufinden ob der Benutzer, bei WinXP, die größere blaue Ansicht (XP-Stil) aktiviert hat oder ob alles im klassischen Format dargestellt ist.

Die Titelleiste ist bei dem XP-Stil größer, was dazuführt, dass der untere Bereich meines selbstgezeichneten Fensters nicht zu sehen bzw. nur durch scrollen zu erreichen ist, was ziemlich blöd ist...

Danke im vorraus!

fsc

Delphi 6 Enterprise

[arbu man]

Eine TForm hat die eigenschaften:

ClientHeigth und Heigth

daraus folgt

Delphi-Quellcode:

titlezeilenhoerhe := Heigth - ClientHeigth ;

Aber aufpassen das mainmenu wird muss etvl. auch berücksichtigs werden.

[himitsu]

Ich hab bei meinen Programmen (wo die Fenstergröße "genau" sein muß) immer etwas umgestellt
vorallem Scaled = False

dann kann man och noch hiermit rumspielen
PrintScale = poNone
BorderStyle = bsSizeable
BorderIcons.biMaximize = False



ansonsten einfach ClientWidth und ClientHeigth setzen ... das ist ja nur der innere Fesnterbereich, also ohne Rahmen und Titelleiste :zwinker:

PS: mein XP ha keine so große Titelleiste (das rießige Standardding gefiehl mir nicht)