| Class TfrmHotkeyEdit (unit hkEdit) |
TForm
| Constructors |
| Functions |
procedure atiHotkeysEndAnimation(Sender: TObject);
procedure btnApplyClick(Sender: TObject);
procedure btnCloseClick(Sender: TObject);
procedure btnDeleteClick(Sender: TObject);
procedure btnNewClick(Sender: TObject);
procedure cboActionsClick(Sender: TObject);
procedure cboParamsClick(Sender: TObject);
procedure chkActiveClick(Sender: TObject);
procedure chkCtrlClick(Sender: TObject);
procedure chkShowIconClick(Sender: TObject);
procedure edtCommandLineChange(Sender: TObject);
procedure edtDescriptionChange(Sender: TObject);
procedure edtKeysToSendChange(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure FormResize(Sender: TObject);
procedure lvHotkeysClick(Sender: TObject);
procedure mnuAboutClick(Sender: TObject);
procedure mnuEditHotkeysClick(Sender: TObject);
procedure mnuExitClick(Sender: TObject);
procedure mnuHelpClick(Sender: TObject);
procedure mnuListHotkeysClick(Sender: TObject);
procedure SysHotkeysHotKey(Sender: TObject; Index: Integer);
procedure HotkeyMenuClick(Sender: TObject);
procedure HotkeyPressed(Index: Integer);
function ReadHotkey(Reader: TReader): String;
procedure AboutBox;
procedure AddTo(var sKey: String; Value: String);
procedure EditHotkeys;
procedure GetHotkey;
procedure HelpIndex;
procedure LoadHotkeys;
function Modifiers(sHotkey: String): THKModifiers;
procedure ReadHotkeys;
procedure SaveHotkeys;
procedure SetHotkey;
procedure SetItem;
procedure ViewHotkeys;
function VirtKey(sHotkey: String): TVirtKey;
procedure wmEditKeys(var Msg: TMessage);
procedure wmGetMinMaxInfo(var Msg: TWMGETMINMAXINFO);
procedure wmSendKeys(var Msg: TMessage);
function HotkeyOK(sHotkey: String): Boolean;
procedure SetChanged(Value: Boolean);
procedure SetControls;| Properties |
property IsChanged : Boolean| Events |
| Variables |
atiHotkeys : TAnimatedTrayIcon;
btnApply : TButton;
btnClose : TButton;
btnDelete : TButton;
btnNew : TButton;
cboActions : TComboBox;
cboHotkey : TComboBox;
cboParams : TComboBox;
chkActive : TCheckBox;
chkAlt : TCheckBox;
chkCtrl : TCheckBox;
chkShift : TCheckBox;
chkShowIcon : TCheckBox;
chkWin : TCheckBox;
edtCommandLine : TBrowseEdit;
edtDescription : TEdit;
edtKeysToSend : TEdit;
grpHotkey : TGroupBox;
lblAction : TLabel;
lblCommandLine : TLabel;
lblDescription : TLabel;
lblHotkey : TLabel;
lvHotkeys : TListView;
mnuAbout : TMenuItem;
mnuEditHotkeys : TMenuItem;
mnuExit : TMenuItem;
mnuHelp : TMenuItem;
mnuHotkeys : TMenuItem;
mnuListHotkeys : TMenuItem;
mnuSeparator0 : TMenuItem;
mnuSeparator1 : TMenuItem;
mnuSeparator2 : TMenuItem;
opdOpenFile : TOpenDialog;
pnlButtons : TPanel;
pnlControls : TPanel;
pnlEdit : TPanel;
pnlOptions : TPanel;
ppmTrayMenu : TPopupMenu;
SysHotkeys : TSysHotKey;
CommandLines : TStringList;
CurModifiers : THKModifiers;
CurVirtKey : TVirtKey;
FChanged : Boolean;
Ignore : Boolean;
Item : TListItem;
Quitting : Boolean;| Constructors |
| Functions |
procedure atiHotkeysEndAnimation(Sender: TObject);
procedure btnApplyClick(Sender: TObject);
procedure btnCloseClick(Sender: TObject);
procedure btnDeleteClick(Sender: TObject);
procedure btnNewClick(Sender: TObject);
procedure cboActionsClick(Sender: TObject);
procedure cboParamsClick(Sender: TObject);
procedure chkActiveClick(Sender: TObject);
procedure chkCtrlClick(Sender: TObject);
procedure chkShowIconClick(Sender: TObject);
procedure edtCommandLineChange(Sender: TObject);
procedure edtDescriptionChange(Sender: TObject);
procedure edtKeysToSendChange(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure FormResize(Sender: TObject);
procedure lvHotkeysClick(Sender: TObject);
procedure mnuAboutClick(Sender: TObject);
procedure mnuEditHotkeysClick(Sender: TObject);
procedure mnuExitClick(Sender: TObject);
procedure mnuHelpClick(Sender: TObject);
procedure mnuListHotkeysClick(Sender: TObject);
procedure SysHotkeysHotKey(Sender: TObject; Index: Integer);
procedure HotkeyMenuClick(Sender: TObject);
procedure HotkeyPressed(Index: Integer);
function ReadHotkey(Reader: TReader): String;
procedure AboutBox;
procedure AddTo(var sKey: String; Value: String);
procedure EditHotkeys;
procedure GetHotkey;
procedure HelpIndex;
procedure LoadHotkeys;
function Modifiers(sHotkey: String): THKModifiers;Scrolllock
procedure ReadHotkeys;
procedure SaveHotkeys;version
procedure SetHotkey;
procedure SetItem;
procedure ViewHotkeys;
function VirtKey(sHotkey: String): TVirtKey;Parameter
procedure wmEditKeys(var Msg: TMessage);
procedure wmGetMinMaxInfo(var Msg: TWMGETMINMAXINFO);
procedure wmSendKeys(var Msg: TMessage);
function HotkeyOK(sHotkey: String): Boolean;
procedure SetChanged(Value: Boolean);
procedure SetControls;| Properties |
property IsChanged : Boolean| Events |
| Variables |
atiHotkeys : TAnimatedTrayIcon;
btnApply : TButton;
btnClose : TButton;
btnDelete : TButton;
btnNew : TButton;
cboActions : TComboBox;
cboHotkey : TComboBox;
cboParams : TComboBox;
chkActive : TCheckBox;
chkAlt : TCheckBox;
chkCtrl : TCheckBox;
chkShift : TCheckBox;
chkShowIcon : TCheckBox;
chkWin : TCheckBox;
edtCommandLine : TBrowseEdit;
edtDescription : TEdit;
edtKeysToSend : TEdit;
grpHotkey : TGroupBox;
lblAction : TLabel;
lblCommandLine : TLabel;
lblDescription : TLabel;
lblHotkey : TLabel;
lvHotkeys : TListView;
mnuAbout : TMenuItem;
mnuEditHotkeys : TMenuItem;
mnuExit : TMenuItem;
mnuHelp : TMenuItem;
mnuHotkeys : TMenuItem;
mnuListHotkeys : TMenuItem;
mnuSeparator0 : TMenuItem;
mnuSeparator1 : TMenuItem;
mnuSeparator2 : TMenuItem;
opdOpenFile : TOpenDialog;
pnlButtons : TPanel;
pnlControls : TPanel;
pnlEdit : TPanel;
pnlOptions : TPanel;
ppmTrayMenu : TPopupMenu;
SysHotkeys : TSysHotKey;
CommandLines : TStringList;
CurModifiers : THKModifiers;
CurVirtKey : TVirtKey;
FChanged : Boolean;
Ignore : Boolean;
Item : TListItem;
Quitting : Boolean;