changeset 10510 | 9329dab04490 |
parent 10472 | 8d04cebedb16 |
child 10603 | bda5c7caf396 |
10509:d62d3c706947 | 10510:9329dab04490 |
---|---|
52 begin |
52 begin |
53 prevGState:= GameState; |
53 prevGState:= GameState; |
54 GameState:= gsConfirm; |
54 GameState:= gsConfirm; |
55 end |
55 end |
56 else |
56 else |
57 if GameState = gsConfirm then |
57 if GameState = gsConfirm then |
58 GameState:= prevGState; |
58 GameState:= prevGState; |
59 |
59 |
60 updateCursorVisibility; |
60 updateCursorVisibility; |
61 end; |
61 end; |
62 |
62 |
63 procedure chForceQuit(var s: shortstring); |
63 procedure chForceQuit(var s: shortstring); |
64 begin |
64 begin |