TDBRICHEDIT in welche ist die aktuelle Zeile?

[marabu]

Hallo,

probiere es mal so:

Delphi-Quellcode:

var
  iLine, iOffset: Integer;
begin
  with DBRichEdit do
  begin
    iOffset := SelStart;
    iLine := Perform(EM_LINEFROMCHAR, iOffset, 0);
  end;
end;

Getippt und nicht getestet.

Grüße vom marabu