Question

I want to create a function that receive multiples strings as parameters.
Like the function printf("Hello %s",name); of C. but I don’t want to pass a ready array, it wouldn’t be readable.

Edit1.text:=lang('Hello');

Edit2.text:=lang('Welcome to {1} guest',place);

Edit3.text:=lang('Hi {1}, is your {2} time in {3}','Victor','first','Disney');

output should be:

Hello
Welcome to Disney guest
Hi Victor is your first time in Disney

how I create the function TForm1.lang(parameters:String):String;, I did a research, but I can’t get it work.

I need to access the parameters[] and the parameters.length also.

I’m needing this to turn my App to multilang.

Answer 1

Here’s an example function of how you can do this:

function TForm1.lang(s: String; params: array of String): String;
var
  i: Integer;
begin
  for i := 0 to High(params) do
  begin
    ShowMessage(params[i]);
  end;
end;

Call it like this:

lang('My format string', ['this', 'that']);

or like this:

var
  b: String;
begin
  b := 'this';
  lang('My format string', [b, 'that']);
end;