Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Memo - Markierter Text mit Tab einrücken

    Delphi
    by shmia, 28. Jul 2004
  SynMemo1.SelText := StringReplace(SynMemo1.SelText, #13#10, #13#10#9, );
  Jedes Vorkommen von Carriage-Return wird durch Carriage-Return + Tabulator ersetzt.
  Kleines Problem dabei:
  nach der letzten selektierten Zeile wird ebenfalls ein Tab eingefügt.
  Dann evtl. so:
  tmp := StringReplace(SynMemo1.SelText, #13#10, #13#10#9, );
  Delete(tmp, Length(tmp), 1); // letztes TAB wech
  SynMemo1.SelText...