Formatierung eines TEdits -> TLabel (Text auf const Platz)

[BAMatze]

Hallo an alle DPler,

Habe wieder eine Problematik, bei der ich eure Hilfe brauche. Also ich möchte eine Eingabe in einem TEdit ermöglichen, welches solange es den Focus nicht hat aussieht, wie ein Label.

Das ist soweit auch geglückt über setzen des BorderStyles und der Hintergrundfarbe des TEdits. Jetzt bleibt eigentlich nur ein kleines Problem: Wenn der Borderstyle geändert wird rückt der Text im TEdit um ein paar Pixel nach unten. Meine Frage wäre, ob man den Text in irgendeiner Weise konstant an seinem Platz halten kann? Ich habe folgendes gefunden: TEdit Text ausrichten und habe dies mit ES_Center probiert, leider war damit mein Problem nicht behoben der Text ist zwar jetzt zentriert aber immer noch an der oberen Kante ausgerichtet, so dass wenn der Borderstyle zwischen bsNone und bsSingle gewechselt wird immer noch in der Höhe springt.
In der Hilfe stehen weiterhin auch keine weiteren Parameter (etwa ES_Top oder ES_Button) so dass mir dort auch die Möglichkeiten ausgehen.

Kennt jemand eventuell eine andere Lösung, außer beim Wechsel zwischen bsNone und bsSingle auch die TEdit.Top-Eigenschaft zu ändern? Gibt es eventuell eine Komponente (unter den Standartkomponenten von Delphi), die mir noch nicht bekannt ist und diese Funktion abdeckt?

Vielen Dank
BAMatze

[himitsu]

Da die Textausrichtungsvarianten immer von einem Punkt aus gehen, welcher ausgehend von der Oberkante über die Schriftgröße berechnet wird, wirst du da wohl keine Möglichkeit finden (außer des Edit selber zu zeichen)

Aber die einfach Lösung: verschieb doch einfach das Edit etwas nach unten, wenn es keinen Border hat :angel2: