[Resolvido] argumentos variáveis

[silvarudo 0]

Aí gente, beleza?

 

Seguinte, to procurando na internet mas não acho nda parecido em Delphi/pascal.

 

Preciso criar uma função que receba número de argumentos variáveis, desde que sejam do mesmo tipo.

 

Assim:

 

Function Variante( dif: Double, x: Integer): Double

var

i: integer;

begin

num_Arg := NumeroArg(dif); // Pega o número de argumentos passados à função

 

for i:= 0 to (x div num_Arg) do

dif := dif + 0.1;

 

result := dif;

end;

 

Depois eu preciso passar mais argumentos do que o declarado:

 

valor := Variante(1, 3, 5, 4.0, 100);

 

Tem como fazer isso em pascal?

Existe função que possamos passar argumentos variáveis em Delphi?

[fernando.fxsoft 0]

Oi,

 

 

Dê uma olhada no seguinte site e veja se lhe ajuda: http://www.chami.com/tips/delphi/112696D.html

 

Pesquisa a função Writeln nos fontes do Delphi, ela usa um número variável de parâmetros.

 

 

Um abraço,

[silvarudo 0]

Valew!! Era isso mesmo que tava procurando. Obrigado.