hedgewars/uWorld.pas
changeset 7069 bcf9d8e64e92
parent 7049 35d762458d66
child 7080 dbf43c07a507
child 7086 e99944b25764
equal deleted inserted replaced
7068:b1b7eb9c8cc9 7069:bcf9d8e64e92
    94 var t: ansistring;
    94 var t: ansistring;
    95 begin
    95 begin
    96     if (GameFlags and gf) <> 0 then
    96     if (GameFlags and gf) <> 0 then
    97         begin
    97         begin
    98         t:= inttostr(i);
    98         t:= inttostr(i);
    99         s:= s + format(trgoal[si], t) + '|'
    99         s:= s + FormatA(trgoal[si], t) + '|'
   100         end;
   100         end;
   101     AddGoal:= s;
   101     AddGoal:= s;
   102 end;
   102 end;
   103 
   103 
   104 function AddGoal(s: ansistring; gf: longword; si: TGoalStrId): ansistring;
   104 function AddGoal(s: ansistring; gf: longword; si: TGoalStrId): ansistring;