From b6a7c8f87a46f10deb3d066c9686c3e1fb6c8ecd Mon Sep 17 00:00:00 2001 From: martin Date: Fri, 13 Feb 2009 22:31:14 +0000 Subject: [PATCH] SynEdit: Fixed debug compilation with $DEFINE VerboseKeys git-svn-id: trunk@18678 - --- components/synedit/synedit.pp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/components/synedit/synedit.pp b/components/synedit/synedit.pp index 6648941be7..a4aa923763 100644 --- a/components/synedit/synedit.pp +++ b/components/synedit/synedit.pp @@ -2088,8 +2088,8 @@ end; procedure TCustomSynEdit.KeyUp(var Key: Word; Shift: TShiftState); begin {$IFDEF VerboseKeys} - DebugLn('[TCustomSynEdit.KeyUp] ',Key - ,' Shift=',ssShift in Shift,' Ctrl=',ssCtrl in Shift,' Alt=',ssAlt in Shift); + DebugLn(['[TCustomSynEdit.KeyUp] ',Key + ,' Shift=',ssShift in Shift,' Ctrl=',ssCtrl in Shift,' Alt=',ssAlt in Shift]); {$ENDIF} inherited KeyUp(Key, Shift); if fLastControlIsPressed<>(GetKeyShiftState=[SYNEDIT_LINK_MODIFIER]) then