luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

TextEditor: Shortcuts work again.

Browse source 
[GB.FORM.EDITOR]
* BUG: TextEditor: Shortcuts work again.
This commit is contained in:
gambas 2018-05-24 17:41:49 +02:00
parent 35e9859894
commit 502b403728
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
comp/src/gb.form.editor/.src/TextEditor.class
View file

@ -218,11 +218,11 @@ Public Sub _new()
$cShortcut = [
"CTRL+A": "SelectAll",
"CTRL+C": "Copy",
"CTRL+Ins": "Copy",
"CTRL+INS": "Copy",
"CTRL+V": "Paste",
"SHIFT+Ins": "Paste",
"SHIFT+INS": "Paste",
"CTRL+X": "Cut",
"SHIFT+Del": "Cut",
"SHIFT+DEL": "Cut",
"CTRL+Y": "Redo",
"CTRL+Z": "Undo"]
Endif
@ -1348,7 +1348,7 @@ Public Sub View_KeyPress()
bCancel = Raise KeyPress
If bCancel Then Goto STOP_EVENT
Try sAction = $cShortcut[Shortcut.FromKey()]
Try sAction = $cShortcut[String.UCase(Shortcut.FromKey())]
If sAction Then
Select Case sAction
Case "Copy"