diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-09-28 11:11:11 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-09-28 11:11:11 +0200 |
| commit | 92d78b37533d96257d1298d81c26feb8bb9834c1 (patch) | |
| tree | ffd33ea9dc73daa3f033c22037e68c11c7b70d70 | |
| parent | 6c9eb1b024e629cc856d3414a96c863a13671a60 (diff) | |
| download | fpGUI-92d78b37533d96257d1298d81c26feb8bb9834c1.tar.xz | |
memo bugfix: The 'delete' key did not work. Now it does.
| -rw-r--r-- | src/gui/fpg_memo.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/gui/fpg_memo.pas b/src/gui/fpg_memo.pas index acdf2f13..0cf0f469 100644 --- a/src/gui/fpg_memo.pas +++ b/src/gui/fpg_memo.pas @@ -1221,7 +1221,7 @@ begin keyDelete: begin ls := GetLineText(FCursorLine); - if FSelEndLine > -1 then + if SelectionText <> '' then DeleteSelection else if FCursorPos < UTF8Length(ls) then begin |