SynEdit: oberste Zeile im sichtbaren Bereich?

[SearchBot]

Ok,

habs schon selber rausbekommen.
Die Komponenten zeigt beim scrollen ja so einen Hint an - also diesen Quelltext gesucht und übernommen

Delphi-Quellcode:

 with SynEdit1 do begin
  Label1.Caption:=inttostr(RowToLine(TopLine));
  Label2.Caption:=inttostr(RowToLine(TopLine + Min(LinesInWindow, DisplayLineCount-TopLine))); 
 end;

Für

Code:

Min()

wird die unit

Code:

math

benötigt.

Problem gelöst