changeset 5100 | 951767beffc8 |
parent 4976 | 088d40d8aba2 |
child 6216 | a6186a8ba90a |
5099:ce1a761d3c1e | 5100:951767beffc8 |
---|---|
384 end; |
384 end; |
385 {$ENDIF} |
385 {$ENDIF} |
386 |
386 |
387 procedure FreezeEnterKey; |
387 procedure FreezeEnterKey; |
388 begin |
388 begin |
389 tkbd[3]:= 1; |
|
389 tkbd[13]:= 1; |
390 tkbd[13]:= 1; |
391 tkbd[27]:= 1; |
|
390 tkbd[271]:= 1; |
392 tkbd[271]:= 1; |
391 end; |
393 end; |
392 |
394 |
393 var Controller: array [0..5] of PSDL_Joystick; |
395 var Controller: array [0..5] of PSDL_Joystick; |
394 |
396 |