Hola,
Ignoro si esta es una forma muy elegante de hacerlo, pero, parece funcionar...
Código Delphi
[-]
function Linda(parametros: array of Variant) : string;
var
i: integer;
begin
for i := 0 to Length(parametros)-1 do
ShowMessage( string(parametros[i]) );
end;
Linda(['Cadena', 1, 0.1, false]);
Incluso parece que el "cast" a "string" sobraría, puesto que parece que el compilador se encarga de ello. De hecho lo siguiente funciona exactamente igual que lo anterior:
Código Delphi
[-]
function Linda(parametros: array of Variant) : string;
var
i: integer;
begin
for i := 0 to Length(parametros)-1 do
ShowMessage( parametros[i] );
end;