Rand eines Edits ermitteln

[hoika]

Hallo,
man kann doch per Theming auch sich breitere Ränder bei einem TEdit einstellen (?).
Wie bekomme ich den breiteren Rand auslesen GetSystemXXX ?

Hintergrund:
Ich brauche einen TEdit mit AutoSize.
Die Breite des Textes ermittle ich mir mit Canvas.TextWidth,
das ist aber zu schmal, weil halt der "Rand" des TEdit auch noch da st.

Durch Ausprobieren habe ich jetzt rausgefunden, dass es 12 Pixel mehr sein müssen
als das TextWidth rausrückt.

GetSystemMetrics(xx) ?

Danke


Heiko

[uligerhardt]

Vielleicht hilft dir EM_GETMARGINS?

[hoika]

Hallo,
nein, das liefert 0 zurück.

siehe auch hier
http://www.delphipraxis.net/74400-tedit-mit-rand.html

Damit ist wirklich Margin, also der Abstand des Textes von Rand gemeint, z.B.
SendMessage(Edit1.Handle, EM_SETMARGINS, EC_LEFTMARGIN, MAKELONG(10, 0));
Damit bleibt das Edit gleich gross, aber der Text rutscht etwas nach rechts.

Heiko