hedgewars/uChat.pas
branchui-scaling
changeset 13386 72bbccf9a715
parent 13385 ec1491bb5acc
child 13387 706b34d0ce60
equal deleted inserted replaced
13385:ec1491bb5acc 13386:72bbccf9a715
   318 // For uStore texture recreation
   318 // For uStore texture recreation
   319 procedure ReloadLines;
   319 procedure ReloadLines;
   320 var i: LongWord;
   320 var i: LongWord;
   321 begin
   321 begin
   322     // also reload empty input line (as chat size/scaling might have changed)
   322     // also reload empty input line (as chat size/scaling might have changed)
   323     //if InputStr.s <> '' then SetLine(InputStr, InputStr.s, true); for i:= 0 to MaxStrIndex do
   323     //if InputStr.s <> '' then
       
   324     SetLine(InputStr, InputStr.s, true);
   324     for i:= 0 to MaxStrIndex do
   325     for i:= 0 to MaxStrIndex do
   325         if Strs[i].s <> '' then
   326         if Strs[i].s <> '' then
   326             begin
   327             begin
   327             RenderChatLineTex(Strs[i], Strs[i].s);
   328             RenderChatLineTex(Strs[i], Strs[i].s);
   328             end;
   329             end;