QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-06-26 17:10:38 +00:00
Code Issues Releases Wiki Activity

Limit contextual menu items to available ones.

Browse source 
- Hides cut/copy/clear if no selection available.
- Hides paste if _CLIPBOARD$ is empty
This commit is contained in:
FellippeHeitor 2016-01-05 22:12:51 -02:00
parent 07c9c5442a
commit 47d5a0a473
1 changed files with 7 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
source/ide/ide_methods.bas
View file

@ -10474,10 +10474,13 @@ SUB IdeMakeContextualMenu
menu$(m, i) = "-": i = i + 1
END IF
menu$(m, i) = "Cu#t Shift+Del or Ctrl+X": i = i + 1
menu$(m, i) = "#Copy Ctrl+Ins or Ctrl+C": i = i + 1
menu$(m, i) = "#Paste Shift+Ins or Ctrl+V": i = i + 1
menu$(m, i) = "Cl#ear Del": i = i + 1
if ideselect then menu$(m, i) = "Cu#t Shift+Del or Ctrl+X": i = i + 1
if ideselect then menu$(m, i) = "#Copy Ctrl+Ins or Ctrl+C": i = i + 1
clip$ = _CLIPBOARD$ 'read clipboard
IF LEN(clip$) THEN menu$(m, i) = "#Paste Shift+Ins or Ctrl+V": i = i + 1
if ideselect then menu$(m, i) = "Cl#ear Del": i = i + 1
menu$(m, i) = "Select #All Ctrl+A": i = i + 1
menu$(m, i) = "-": i = i + 1
menu$(m, i) = "#Undo Ctrl+Z": i = i + 1