FIX: Viewer - selection when text is scrolled horizontally

This commit is contained in:
Alexander Koblov 2022-01-31 18:19:59 +03:00
commit fd7348ca23

View file

@ -2813,7 +2813,7 @@ begin
// Get position of last character of the line.
EndLine := GetEndOfLine(StartLine);
if x = 0 then
if (x = 0) and ((Mode <> vcmText) or (FHPosition = 0)) then
begin
CharSide := csBefore;
Exit(StartLine);