Moin allezusammen!
Wie der Titel es vermuten lässt, möchte ich den Text in einem TEdit (rechtsbündig) ausrichten.
Ich habe schon mal eine Komponente gebaut, die das kann. Nur darf ich in meinem aktuellen Projekt ausschließlich Standard-Komponenten verwenden
Zum Glück gibt es in der
DP auch dafür eine Lösung (
oh ja, ich habe die SuFu bemüht ^^). Dieses Code-Fragment soll das Problem lösen:
Delphi-Quellcode:
SetWindowLong(Edit1.Handle, GWL_STYLE, GetWindowLong(
Edit1.Handle, GWL_STYLE) and not ES_LEFT or ES_RIGHT)
Was hier gemacht wird, ist mehr als offensichtlich. Nur leider funktioniert das bei mir nicht. Ich habe es auf D5, D7 und D2007 ausprobiert und nirgendwo hat es etwas bewirkt. Weder im OnCreate-Event, noch im Constructor (der Formulars) und schon gar nicht beim z.B. ButtonClick...
Bei einer Abfrage des GWL_STYLEs des Edits ist zwar ES_RIGHT übernommen worden, aber auf die Anzeige des Textes hat das keine Auswirkung.
Hat jemand eine Idee, woran das liegen könnte und/oder was ich sonst noch versuchen könnte?
Vielen Dank und Grüße vom
Ganymed