index 578f86583d3d3df5ea68f8afebc94f630fa1a754..93f030194db1e09cd09780573f2ddf3865ea8aff 100644 (file)
-(* Copyright (C) DooM 2D:Forever Developers
+(* Copyright (C) Doom 2D: Forever Developers
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
- * the Free Software Foundation, either version 3 of the License, or
- * (at your option) any later version.
+ * the Free Software Foundation, version 3 of the License ONLY.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
function cmdName (): AnsiString;
end;
function cmdName (): AnsiString;
end;
- TCmdHash = specialize THashBase<AnsiString, PHolmesCommand>;
+ TCmdHash = specialize THashBase<AnsiString, PHolmesCommand, THashKeyStr>;
// ////////////////////////////////////////////////////////////////////////// //
// ////////////////////////////////////////////////////////////////////////// //
// ////////////////////////////////////////////////////////////////////////// //
function hashNewCommand (): TCmdHash;
begin
// ////////////////////////////////////////////////////////////////////////// //
function hashNewCommand (): TCmdHash;
begin
- result := TCmdHash.Create(hashStrHash, hashStrEqu, hashStrFree);
+ result := TCmdHash.Create();
end;
end;
end;
end;
-function keybindExecute (var ev: THKeyEvent): Boolean;
+function keybindExecute (var ev: TFUIEvent): Boolean;
var
f: Integer;
begin
var
f: Integer;
begin
end;
end;
-function msbindExecute (var ev: THMouseEvent): Boolean;
+function msbindExecute (var ev: TFUIEvent): Boolean;
var
f: Integer;
begin
var
f: Integer;
begin