error identifier expected const found in WQ.pas

[trajektorde]

wq.pas(113,1) Fatal: Syntax error, "identifier" expected but "CONST" found

obige Fehlermeldung erscheint, wenn ich ein Programm mit der folgenden unit wq.pas starten will
hält an an der Zeile: const

Delphi-Quellcode:

unit WQ;

interface

uses
  SysUtils, Classes, ViDrivers, ViTypes, ViUtils, ViClasses,
  ViScreens, ViViews, ViMenus, ViApp, ViDialogs, ViMsgBox,
  ViStdDlg, ViColorSel, ViMessages, ViThreads, ViEditors,
{$IFDEF WIN}
  WinTimers;
{$ENDIF}
{$IFDEF WDOSX}
  WDosTimers;
{$ENDIF}

const

{QT key codes }

    QKey_Escape = 4096 { $1000 };
    QKey_Tab = 4097 { $1001 };
    QKey_Backtab = 4098 { $1002 };
    QKey_Backspace = 4099 { $1003 };
    QKey_Return = 4100 { $1004 };
    QKey_Enter = 4101 { $1005 };
    QKey_Insert = 4102 { $1006 };
    QKey_Delete = 4103 { $1007 };      .....

Grüße