Zeilen einer Auswahl unter SynEdit erhalten

[Robert_G]

So geht's einfacher:

Delphi-Quellcode:

Var
  XY : TBufferCoord;
Begin
  XY := SynEdit.CharIndexToRowCol(SynEdit.SelStart);
  showmessage('Column: ' + IntToStr(XY.Char) + #13#10+
              'Row: ' + IntToStr(XY.Line));

In die Uses-clause deiner Unit musst du dazu noch SynEditTypes hinzufügen.