Pārlūkot izejas kodu

--- Merging r13869 into '.':
U rtl/inc/system.fpd

git-svn-id: branches/fixes_2_4@13870 -

marco 16 gadi atpakaļ
vecāks
revīzija
13a2ce4379
1 mainītis faili ar 2 papildinājumiem un 0 dzēšanām
  1. 2 0
      rtl/inc/system.fpd

+ 2 - 0
rtl/inc/system.fpd

@@ -57,3 +57,5 @@ Procedure SetLength(Var S : AStringType; Len : Integer);
 Procedure SetLength(Var A : DynArrayType; Len : Integer);
 Function Length(S : AStringType) : Integer;
 Function Length(A : DynArrayType) : Integer;
+Procedure WriteStr(Var S : String; Args : Arguments);
+Procedure ReadStr(Var S : String; Args : Arguments);