瀏覽代碼

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

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

marco 16 年之前
父節點
當前提交
13a2ce4379
共有 1 個文件被更改,包括 2 次插入0 次删除
  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);