hedgewars/uChat.pas
changeset 1485 51c11e77408a
parent 1431 21ca09524f9c
child 1819 17dac76954d1
--- a/hedgewars/uChat.pas	Sat Nov 08 11:54:46 2008 +0000
+++ b/hedgewars/uChat.pas	Sun Nov 09 07:51:53 2008 +0000
@@ -185,6 +185,8 @@
 	
 	utf8:= char(Key or firstByteMark[btw]) + utf8;
 
+	if byte(InputStr.s[0]) + btw > 240 then exit;
+
 	InputStrL[byte(InputStr.s[0]) + btw]:= InputStr.s[0];
 	SetLine(InputStr, InputStr.s + utf8, true)
 	end