diff options
-rw-r--r-- | src/gui/gui_edit.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/gui/gui_edit.pas b/src/gui/gui_edit.pas index 6591ff4e..7cad6a8c 100644 --- a/src/gui/gui_edit.pas +++ b/src/gui/gui_edit.pas @@ -575,8 +575,10 @@ begin if FCursorPos <> cp then begin FCursorPos := cp; + AdjustCursor; Repaint; end; + end; procedure TfpgCustomEdit.HandleDoubleClick(x, y: integer; button: word; shiftstate: TShiftState); |