diff options
Diffstat (limited to 'src/corelib/fpg_base.pas')
| -rw-r--r-- | src/corelib/fpg_base.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/corelib/fpg_base.pas b/src/corelib/fpg_base.pas index 970c2fee..14b03038 100644 --- a/src/corelib/fpg_base.pas +++ b/src/corelib/fpg_base.pas @@ -790,9 +790,9 @@ begin if ssShift in AShiftState then Result := 'Shift+'; if ssCtrl in AShiftState then - Result := 'Ctrl+'; + Result := Result + 'Ctrl+'; if ssAlt in AShiftState then - Result := 'Alt+'; + Result := Result + 'Alt+'; if (AKey > Ord(' ')) and (AKey < 255) then begin |