* Better presentation of arguments (bug ID 32275)

git-svn-id: trunk@36923 -
This commit is contained in:
michael 2017-08-16 07:20:48 +00:00
parent 586de3ed67
commit 2ac3610048

View File

@ -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);