115 DefaultBinds[ 48]:= '+volup';

   115 DefaultBinds[ 48]:= '+volup';

   116 DefaultBinds[ 57]:= '+voldown';

   116 DefaultBinds[ 57]:= '+voldown';

   117 DefaultBinds[ 99]:= 'capture';

   117 DefaultBinds[ 99]:= 'capture';

   118 DefaultBinds[102]:= 'fullscr';

   118 DefaultBinds[102]:= 'fullscr';

   119 DefaultBinds[104]:= 'findhh';

   119 DefaultBinds[104]:= 'findhh';

   120 SetDefaultBinds

   121 SetDefaultBinds

   121 end;

   122 end;

   122 

   123 

   123 procedure SetBinds(var binds: TBinds);

   124 procedure SetBinds(var binds: TBinds);

   124 begin

   125 begin