Ошибочка...
В функции ошибка.. Возникает когда хочешь используешь SynMemo.SelText, а выделенного текста нет ('').
В Index передаётся -1
function TfsSyntaxMemo.LineLength(Index: Integer): Integer;
begin
If Index<0 then Result := 0 else //igrik
Result := Length(LineAt(Index));
end;
В Index передаётся -1
function TfsSyntaxMemo.LineLength(Index: Integer): Integer;
begin
If Index<0 then Result := 0 else //igrik
Result := Length(LineAt(Index));
end;