diff options
Diffstat (limited to 'rtl/inc/system.fpd')
-rw-r--r-- | rtl/inc/system.fpd | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/rtl/inc/system.fpd b/rtl/inc/system.fpd index b865c28c67..9f0de7c413 100644 --- a/rtl/inc/system.fpd +++ b/rtl/inc/system.fpd @@ -61,10 +61,18 @@ Function SizeOf (X : TAnyType) : Longint; Procedure Str (Var X : TNumericType; Var S : String); Function Succ (X : TOrdinal) : TOrdinal; Procedure Val (const S : string;Var V;var Code : word); -Procedure Write (Args : Arguments); -Procedure Writeln (Args : Arguments); -Procedure Write (Var F : Text; Args : Arguments); -Procedure WriteLn (Var F : Text; Args : Arguments); +Procedure Write (V1); +Procedure Write (V1,V2); +Procedure Write (V1,V2,v3); +Procedure WriteLn (V1); +Procedure WriteLn (V1,V2); +Procedure WriteLn (V1,V2,v3); +Procedure Write (var F : Text; V1); +Procedure Write (var F : Text; V1,V2); +Procedure Write (var F : Text; V1,V2,v3); +Procedure WriteLn (var F : Text; V1); +Procedure WriteLn (var F : Text; V1,V2); +Procedure WriteLn (var F : Text; V1,V2,v3); Function Copy(S : AStringType; Index,Count : SizeInt) : String; Function Copy(A : DynArrayType; Index,Count : SizeInt) : DynArray; Procedure SetLength(Var S : AStringType; Len : SizeInt); |