Hallo!
@DeddyH: Bist nicht der einzige
@Power-Poler: In #12 hatte ich schon die "Lösung" mit den Leerzeichen skizziert.
So, wenn ich mich schon mal damit auseinandersetze:
Schau mal unter
http://www.delphipraxis.net/internal...=emsettabstops
Bezieht sich zwar auf TMemo, ist aber Deinem Problem sehr ähnlich. Ausschnitt aus #13:
Zitat:
Delphi-Quellcode:
var
ndx : integer;
TabArray : Array [0..4] of integer;
begin
Memo1.WantTabs := True;
for ndx := 0 to 4 do
begin
TabArray[ndx] := 30 * ndx;
end;
SendMessage(Memo1.Handle,EM_SETTABSTOPS,5,LongInt(@TabArray));
end;
Dabei ist wohl zu beachten, dass als Einheit für die Tabs "Template Units" verwendet werden. mit Zeichenanzahl * 4 + Abstand sollte das funktionieren, habe ich aber nicht getestet.
Gruß,
Zugi