Da der Tabulator im Hint nicht funktioniert, bleibt noch die Möglichkeit die Zwischewnräume mit Leerzeichen aufzufüllen. (entweder von Hand, oder automatisch)
Delphi-Quellcode:
Procedure TForm1.FormCreate(Sender: TObject);
Function TA(S: String; B: Integer): String;
Begin
While TextLaenge(Form1.Font, S) < B do S := S + ' ';
Result := S;
End;
Begin
Form1.Hint :=
TA('123', 30) + TA('abc', 30) + 'xyz'#13 +
TA('12', 30) + TA('ab', 30) + 'xy'#13 +
TA('1', 30) + TA('a', 30) + 'x';
End;
Funktion TextLaenge siehe
Code-Library -> Grafik / Sound / Multimedia ->
Länge und Höhe eines Textes (String)
TA erweitert einfach nur den String, bis er mindestens
30 Pixel lang ist.
in TextLaenge(
Form1.Font, S) muß der Font angegeben werden, der auch im Hint angezeigt wird, sonst wird nicht richtig gerechnet.
Ich hab hier im Beispiel Form1.Font verwendet, da ich jetzt nicht weiß, wo der Font für die Hint's gespeichert ist.