equal
deleted
inserted
replaced
822 ZoomValue:= cDefaultZoomLevel; |
822 ZoomValue:= cDefaultZoomLevel; |
823 end; |
823 end; |
824 |
824 |
825 procedure chChat(var s: shortstring); |
825 procedure chChat(var s: shortstring); |
826 begin |
826 begin |
827 s:= s; // avoid compiler hint |
827 s:= s; // avoid compiler hint |
828 GameState:= gsChat; |
828 GameState:= gsChat; |
829 KeyPressChat(27) |
829 KeyPressChat(27) |
830 end; |
830 end; |
831 |
831 |
832 procedure chHistory(var s: shortstring); |
832 procedure chHistory(var s: shortstring); |
833 begin |
833 begin |
834 s:= s; // avoid compiler hint |
834 s:= s; // avoid compiler hint |
835 uChat.showAll:= not uChat.showAll |
835 uChat.showAll:= not uChat.showAll |
836 end; |
836 end; |