Unit mseactions

Description

 

Overview

Classes, Interfaces, Objects and Records

Name Description
Class taction  
Class tshortcutaction  
Class tshortcutactions  
Class tsysshortcuts  
Class tassistiveshortcuts  
Record shortcutstatinfoty  
Class tshortcutcontroller  
Class tcustomhelpcontroller  
Class thelpcontroller  

Functions and Procedures

function issameshortcut(const a,b: shortcutarty): boolean;
function getsimpleshortcut(const asource: shortcutarty): shortcutty; overload;
function getsimpleshortcut(const asource: actioninfoty): shortcutty; overload;
function getsimpleshortcut1(const asource: actioninfoty): shortcutty;
function setsimpleshortcut(const avalue: shortcutty): shortcutarty; overload;
procedure setsimpleshortcut(const avalue: shortcutty; var adest: shortcutarty); overload;
procedure setsimpleshortcut(const avalue: shortcutty; var adest: actioninfoty); overload;
procedure setsimpleshortcut1(const avalue: shortcutty; var adest: actioninfoty);
function checkshortcutconflict(const a,b: shortcutarty): boolean;
procedure setactionshortcuts(const sender: iactionlink; const value: shortcutarty);
procedure setactionshortcuts1(const sender: iactionlink; const value: shortcutarty);
procedure setactionshortcut(const sender: iactionlink; const value: shortcutty);
procedure setactionshortcut1(const sender: iactionlink; const value: shortcutty);
function isactionshortcutstored(const info: actioninfoty): boolean;
function isactionshortcut1stored(const info: actioninfoty): boolean;
procedure setactionimagelist(const sender: iactionlink; const value: timagelist);
function isactionimageliststored(const info: actioninfoty): boolean;
procedure getshortcutlist(out keys: integerarty; out names: msestringarty);
function getshortcutname(const shortcut: shortcutty): msestring;
function getshortcutname(const key: keyty; const shiftstate: shiftstatesty): msestring;
function getsysshortcutdispname(const aitem: sysshortcutty): msestring;
function getassistiveshortcutdispname( const aitem: assistiveshortcutty): msestring;
function isvalidshortcut(const ashortcut: shortcutty): boolean;
function encodeshortcut(const akey: keyty; const ashiftstate: shiftstatesty): shortcutty;
function encodeshortcutname(const key: shortcutarty): msestring; overload;
function encodeshortcutname(const key: shortcutty): msestring; overload;
function checkshortcutcode(const shortcut: shortcutty; const info: keyeventinfoty; const apreview: boolean = false): boolean; overload;
function checkshortcutcode(const shortcut: shortcutty; const info: keyinfoty): boolean; overload;
function checkactionshortcut(const ashortcut: shortcutarty; var keyinfo: keyeventinfoty): boolean;
function checkactionshortcut(var info: actioninfoty; var keyinfo: keyeventinfoty): boolean;
function doactionshortcut(const sender: tobject; var info: actioninfoty; var keyinfo: keyeventinfoty; const beforeexecute: proceventty = nil): boolean;
procedure calccaptiontext(var info: actioninfoty; const aseparator: msechar);
function issysshortcut(const ashortcut: sysshortcutty; const ainfo: keyeventinfoty): boolean;

Types

sysshortcutty = (...);
sysshortcutaty = array[sysshortcutty] of shortcutty;
psysshortcutaty = ˆsysshortcutaty;
shortcutconstty = array[0..2] of shortcutty;
assistiveshortcutty = (...);
assistiveshortcutconstty = array[assistiveshortcutty] of shortcutconstty;
assistiveshortcutaty = array[assistiveshortcutty] of shortcutarty;
passistiveshortcutaty = ˆassistiveshortcutaty;
shortcutrecarty = array of record name: string; value: int32; end;
assistiveshortcutrecarty = array of record name: string; value: shortcutarty; end;
shortcutstatinfoarty = array of shortcutstatinfoty;
shortcutcontrollereventty = procedure( const sender: tshortcutcontroller) of object;
helpcontrollereventty = procedure(const sender: tcustomhelpcontroller; const helpsender: tmsecomponent; var handled: boolean) of object;
helpcontrollerprocty = procedure(const sender: tcustomhelpcontroller; const helpsender: tmsecomponent; var handled: boolean);

Constants

shift = ord(key_modshift);
ctrl = ord(key_modctrl);
alt = ord(key_modalt);
pad = ord(key_modpad);
modmask = shift or ctrl or alt or $1000 or pad;
defaultsysshortcuts: sysshortcutaty = (ctrl+ord(key_c), ctrl+ord(key_v), ctrl+ord(key_x), ctrl+ord(key_a), ctrl+ord(key_insert),shift+ctrl+ord(key_insert),ctrl+ord(key_delete), (ctrl+shift+ord(key_c)),(ctrl+shift+ord(key_v)), ctrl+ord(key_z), shift+ctrl+ord(key_z) );
defaultsysshortcuts1: sysshortcutaty = (ord(key_none), shift+ord(key_insert), shift+ord(key_delete), ord(key_none), ord(key_none), ord(key_none), ord(key_none), ord(key_none), ord(key_none), ord(key_none), ord(key_none) );
defaultassistiveshortcuts: assistiveshortcutconstty = ((ctrl+ord(key_space),0,0),(ctrl+shift+ord(key_space),0,0), (ctrl+ord(key_y),ord(key_f),0),(ctrl+ord(key_y),ord(key_l),0), (ctrl+ord(key_y),ord(key_c),0), (pad+ctrl+ord(key_minus),0,0),(pad+ctrl+ord(key_plus),0,0), (pad+shift+ctrl+ord(key_minus),0,0),(pad+shift+ctrl+ord(key_plus),0,0) );
defaultassistiveshortcuts1: assistiveshortcutconstty = ((pad+ctrl+ord(key_return),0,0),(pad+ctrl+shift+ord(key_return),0,0), (ord(key_none),0,0),(ord(key_none),0,0), (ord(key_none),0,0), (ord(key_none),0,0),(ord(key_none),0,0), (ord(key_none),0,0),(ord(key_none),0,0) );

Variables

sysshortcuts: sysshortcutaty;
sysshortcuts1: sysshortcutaty;
assistiveshortcuts: assistiveshortcutaty;
assistiveshortcuts1: assistiveshortcutaty;

Description

Functions and Procedures

function issameshortcut(const a,b: shortcutarty): boolean;
 
function getsimpleshortcut(const asource: shortcutarty): shortcutty; overload;
 
function getsimpleshortcut(const asource: actioninfoty): shortcutty; overload;
 
function getsimpleshortcut1(const asource: actioninfoty): shortcutty;
 
function setsimpleshortcut(const avalue: shortcutty): shortcutarty; overload;
 
procedure setsimpleshortcut(const avalue: shortcutty; var adest: shortcutarty); overload;
 
procedure setsimpleshortcut(const avalue: shortcutty; var adest: actioninfoty); overload;
 
procedure setsimpleshortcut1(const avalue: shortcutty; var adest: actioninfoty);
 
function checkshortcutconflict(const a,b: shortcutarty): boolean;
 
procedure setactionshortcuts(const sender: iactionlink; const value: shortcutarty);
 
procedure setactionshortcuts1(const sender: iactionlink; const value: shortcutarty);
 
procedure setactionshortcut(const sender: iactionlink; const value: shortcutty);
 
procedure setactionshortcut1(const sender: iactionlink; const value: shortcutty);
 
function isactionshortcutstored(const info: actioninfoty): boolean;
 
function isactionshortcut1stored(const info: actioninfoty): boolean;
 
procedure setactionimagelist(const sender: iactionlink; const value: timagelist);
 
function isactionimageliststored(const info: actioninfoty): boolean;
 
procedure getshortcutlist(out keys: integerarty; out names: msestringarty);
 
function getshortcutname(const shortcut: shortcutty): msestring;
 
function getshortcutname(const key: keyty; const shiftstate: shiftstatesty): msestring;
 
function getsysshortcutdispname(const aitem: sysshortcutty): msestring;
 
function getassistiveshortcutdispname( const aitem: assistiveshortcutty): msestring;
 
function isvalidshortcut(const ashortcut: shortcutty): boolean;
 
function encodeshortcut(const akey: keyty; const ashiftstate: shiftstatesty): shortcutty;
 
function encodeshortcutname(const key: shortcutarty): msestring; overload;
 
function encodeshortcutname(const key: shortcutty): msestring; overload;
 
function checkshortcutcode(const shortcut: shortcutty; const info: keyeventinfoty; const apreview: boolean = false): boolean; overload;
 
function checkshortcutcode(const shortcut: shortcutty; const info: keyinfoty): boolean; overload;
 
function checkactionshortcut(const ashortcut: shortcutarty; var keyinfo: keyeventinfoty): boolean;
 
function checkactionshortcut(var info: actioninfoty; var keyinfo: keyeventinfoty): boolean;
 
function doactionshortcut(const sender: tobject; var info: actioninfoty; var keyinfo: keyeventinfoty; const beforeexecute: proceventty = nil): boolean;
 
procedure calccaptiontext(var info: actioninfoty; const aseparator: msechar);
 
function issysshortcut(const ashortcut: sysshortcutty; const ainfo: keyeventinfoty): boolean;
 

Types

sysshortcutty = (...);
 
Values
  • sho_copy
  • sho_paste
  • sho_cut
  • sho_selectall
  • sho_rowinsert
  • sho_rowappend
  • sho_rowdelete
  • sho_copycells
  • sho_pastecells
  • sho_groupundo
  • sho_groupredo
sysshortcutaty = array[sysshortcutty] of shortcutty;
 
psysshortcutaty = ˆsysshortcutaty;
 
shortcutconstty = array[0..2] of shortcutty;
 
assistiveshortcutty = (...);
 
Values
  • shoa_speakagain
  • shoa_speakpath
  • shoa_firstelement
  • shoa_lastelement
  • shoa_cancelspeech
  • shoa_slower
  • shoa_faster
  • shoa_volumedown
  • shoa_volumeup
assistiveshortcutconstty = array[assistiveshortcutty] of shortcutconstty;
 
assistiveshortcutaty = array[assistiveshortcutty] of shortcutarty;
 
passistiveshortcutaty = ˆassistiveshortcutaty;
 
shortcutrecarty = array of record name: string; value: int32; end;
 
assistiveshortcutrecarty = array of record name: string; value: shortcutarty; end;
 
shortcutstatinfoarty = array of shortcutstatinfoty;
 
shortcutcontrollereventty = procedure( const sender: tshortcutcontroller) of object;
 
helpcontrollereventty = procedure(const sender: tcustomhelpcontroller; const helpsender: tmsecomponent; var handled: boolean) of object;
 
helpcontrollerprocty = procedure(const sender: tcustomhelpcontroller; const helpsender: tmsecomponent; var handled: boolean);
 

Constants

shift = ord(key_modshift);
 
ctrl = ord(key_modctrl);
 
alt = ord(key_modalt);
 
pad = ord(key_modpad);
 
modmask = shift or ctrl or alt or $1000 or pad;
 
defaultsysshortcuts: sysshortcutaty = (ctrl+ord(key_c), ctrl+ord(key_v), ctrl+ord(key_x), ctrl+ord(key_a), ctrl+ord(key_insert),shift+ctrl+ord(key_insert),ctrl+ord(key_delete), (ctrl+shift+ord(key_c)),(ctrl+shift+ord(key_v)), ctrl+ord(key_z), shift+ctrl+ord(key_z) );
 
defaultsysshortcuts1: sysshortcutaty = (ord(key_none), shift+ord(key_insert), shift+ord(key_delete), ord(key_none), ord(key_none), ord(key_none), ord(key_none), ord(key_none), ord(key_none), ord(key_none), ord(key_none) );
 
defaultassistiveshortcuts: assistiveshortcutconstty = ((ctrl+ord(key_space),0,0),(ctrl+shift+ord(key_space),0,0), (ctrl+ord(key_y),ord(key_f),0),(ctrl+ord(key_y),ord(key_l),0), (ctrl+ord(key_y),ord(key_c),0), (pad+ctrl+ord(key_minus),0,0),(pad+ctrl+ord(key_plus),0,0), (pad+shift+ctrl+ord(key_minus),0,0),(pad+shift+ctrl+ord(key_plus),0,0) );
 
defaultassistiveshortcuts1: assistiveshortcutconstty = ((pad+ctrl+ord(key_return),0,0),(pad+ctrl+shift+ord(key_return),0,0), (ord(key_none),0,0),(ord(key_none),0,0), (ord(key_none),0,0), (ord(key_none),0,0),(ord(key_none),0,0), (ord(key_none),0,0),(ord(key_none),0,0) );
 

Variables

sysshortcuts: sysshortcutaty;
 
sysshortcuts1: sysshortcutaty;
 
assistiveshortcuts: assistiveshortcutaty;
 
assistiveshortcuts1: assistiveshortcutaty;
 

Generated by PasDoc 0.16.0.