Frage zu SynEdit.

[Die Muhkuh]

Delphi-Quellcode:

procedure TForm1.Action1Update(Sender: TObject);
var
  BufferCoord: TBufferCoord;

begin
  BufferCoord := SynEdit1.CaretXY;
  StatusBar1.Panels[0].Text := Format(' %6d:%3d ', [BufferCoord .Y, BufferCoord .X]);
end;