Ver Mensaje Individual
  #2  
Antiguo 25-10-2006
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
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;
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita