108 pkbd:= PByteArray(SDL_GetKeyState(@i));

   108 pkbd:= PByteArray(SDL_GetKeyState(@i));

   109 {$ENDIF}

   109 {$ENDIF}

   110 TryDo(i < cKeyMaxIndex, 'SDL keys number is more than expected (' + inttostr(i) + ')', true);

   110 TryDo(i < cKeyMaxIndex, 'SDL keys number is more than expected (' + inttostr(i) + ')', true);

   111 

   111 

   112 for t:= 0 to Pred(i) do

   112 for t:= 0 to Pred(i) do

   116 end;

   114 end;

   117 

   115 

   118 procedure InitKbdKeyTable;

   116 procedure InitKbdKeyTable;

   119 var i, t: LongInt;

   117 var i, t: LongInt;

   120     s: string[15];

   118     s: string[15];