Uso de variables tipo Variant

[dec]

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;

// Ejemplo de llamada a Linda
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;