Zeile im Richedit makieren

[Stevie]

Zitat von kingflo:

Jetzt brache ich sowas nochmal für Syneditor. Aber Syneditor hat kein SelLeghth

Ja, da geht das etwas anders...

Delphi-Quellcode:

procedure SelectLine(const Line: Integer; SynControl: TCustomSynEdit);
var
  Start, Ende: Integer;
begin
  SynControl.SelStart := 0;
  SynControl.SelEnd := 0;
  SynControl.CaretXY := Point(0, Line);
  Start := SynControl.SelStart;
  SynControl.CaretY := Succ(Line);
  Ende := SynControl.SelStart;
  SynControl.SelStart := Start;
  SynControl.SelEnd := Ende;
end;