equal
deleted
inserted
replaced
297 |
297 |
298 if ChatHidden and (not showAll) then |
298 if ChatHidden and (not showAll) then |
299 visibleCount:= 0; |
299 visibleCount:= 0; |
300 |
300 |
301 // draw chat lines with some distance from screen border |
301 // draw chat lines with some distance from screen border |
|
302 {$IFDEF USE_TOUCH_INTERFACE} |
|
303 left:= 4 - cScreenWidth div 2; |
|
304 top := 55 + visibleCount * ClHeight; // we start with input line (if any) |
|
305 {$ELSE} |
302 left:= 4 - cScreenWidth div 2; |
306 left:= 4 - cScreenWidth div 2; |
303 top := 10 + visibleCount * ClHeight; // we start with input line (if any) |
307 top := 10 + visibleCount * ClHeight; // we start with input line (if any) |
|
308 {$ENDIF} |
304 |
309 |
305 // draw chat input line first and under all other lines |
310 // draw chat input line first and under all other lines |
306 if isInChatMode and (InputStr.Tex <> nil) then |
311 if isInChatMode and (InputStr.Tex <> nil) then |
307 begin |
312 begin |
308 |
313 |