Einzelnen Beitrag anzeigen

shAd

Registriert seit: 26. Jul 2004
Ort: Stuttgart
19 Beiträge
 
Delphi 7 Professional
 
#1

Memo - Markierter Text mit Tab einrücken

  Alt 28. Jul 2004, 16:17
Hallo,

Ich möchte wenn im Memo Feld Text markiert ist den mit einem Druck auf Tab komplett einrücken.

Meine Überlegung ging soweit:

Delphi-Quellcode:
Zeilen := SynMemo1.SelLength;
I:=0;
if Key=9 then begin
while I <> Zeilen do I := I + 1;
SynMemo1.SelText := #9 + SynMemo1.SelText;
end;
Eine Schleife die je nachdem wieviel Zeilen marktiert sind aufgerufen wird. Nun fehlt logischerweise der Teil, der mir die nächste Zeile markiert und einrückt. Bei meinem Beispiel wird natürlich nur eine Zeile eingerückt.

Ich habe im Delphi Manual geblättert, doch es ist etwas schwer, das das richtige zu finden, wenn man nicht genau weis wonnach man sucht.

Daher frag ich euch mal ganz dreist um nen Tipp!

gruß,
shAd
Er erreichte einen Speisesaal. Wenn man an dem dort stehenden langen Tisch Platz nahm, so konnte man ziemlich sicher sein, daß die Leute am gegenüberliegenden Ende in einer anderen Zeitzone saßen.
- Terry Pratchett in Wachen! Wachen!
  Mit Zitat antworten Zitat