--- a/hedgewars/uChat.pas	Mon Nov 26 17:59:27 2018 +0100
+++ b/hedgewars/uChat.pas	Mon Nov 26 18:03:39 2018 +0100
@@ -299,8 +299,13 @@
     visibleCount:= 0;
 
 // draw chat lines with some distance from screen border
+{$IFDEF USE_TOUCH_INTERFACE}
+left:= 4 - cScreenWidth div 2;
+top := 55 + visibleCount * ClHeight; // we start with input line (if any)
+{$ELSE}
 left:= 4 - cScreenWidth div 2;
 top := 10 + visibleCount * ClHeight; // we start with input line (if any)
+{$ENDIF}
 
 // draw chat input line first and under all other lines
 if isInChatMode and (InputStr.Tex <> nil) then