Creating a array of const

How do you create a array that can be passed to Format.  I do not know what the number and type of arguments that need to be passed until run time.
The format string is not an issue, but the argument list is.
charryAsked:
Who is Participating?
 
JimBob091197Connect With a Mentor Commented:
Hi

Try the following:
procedure TForm1.Button1Click(Sender: TObject);
var
      Args: array[1..10] of TVarRec;
begin
      FillChar(Args, SizeOf(Args), 0);
      Args[1].VType := vtPChar;
      Args[1].VPChar := PChar('Bob');
      Args[2].VType := vtInteger;
      Args[2].VInteger := 5;
      Caption := Format('%s %d', Args);
end;

Declare the Args array big enough for the maximum number of arguments.  Look up help on TVarRec for the different types.

Hope this helps.
JB
0
 
charryAuthor Commented:
Edited text of question
0
 
charryAuthor Commented:
Thanks JimBob thats what I needed!!!!!!!!
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.