Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Parametros Opcionales en funciones

55 views
Skip to first unread message

Alfonso López Almagro

unread,
Jun 5, 1998, 3:00:00 AM6/5/98
to

Saludos a todos

Sabe alguien si es posible definir Funciones (o procedimientos) en
delphi 3 con parametros opcionales, es decir que si los necesitas los
pasas y si no ni siquiera los pones.

Se que en VB si es posible hacerlo.

Gracias
Alfonso López
meta...@hotmail.com


Gonzalo Matamala

unread,
Jun 5, 1998, 3:00:00 AM6/5/98
to

El día Fri, 05 Jun 1998 10:14:19 +0200, "Alfonso López Almagro"
<meta...@hotmail.com> escribió:

>Saludos a todos
>
>Sabe alguien si es posible definir Funciones (o procedimientos) en
>delphi 3 con parametros opcionales, es decir que si los necesitas los
>pasas y si no ni siquiera los pones.
>
>Se que en VB si es posible hacerlo.
>

Prueba con un "Open Array" de tipo 'Variant' y se lo pasas como único
parámetro.

Gonzalo
matamala@-nospam-ctv.es
Por favor, quite "-nospam-" de mi cuenta para contestarme

José León Serna

unread,
Jun 5, 1998, 3:00:00 AM6/5/98
to

Hola:
Que yo sepa, se hace con arrays variables de parámetros:

Ejemplo:

procedure MiFuncion(valores: array of integer);
var
i:longint;
resul: longint;
begin
resul:=0;
for i:=0 to high(valores) do begin
resul:=resul+valores[i];
end;
showmessage(inttostr(resul));
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
MiFuncion([1,2,3]);
end;


Espero que te sirva.

Alfonso López Almagro <meta...@hotmail.com> escribió en artículo
<3577A8DB...@hotmail.com>...


> Saludos a todos
>
> Sabe alguien si es posible definir Funciones (o procedimientos) en
> delphi 3 con parametros opcionales, es decir que si los necesitas los
> pasas y si no ni siquiera los pones.
>
> Se que en VB si es posible hacerlo.
>

> Gracias
> Alfonso López
> meta...@hotmail.com
>
>

Joshua

unread,
Jun 5, 1998, 3:00:00 AM6/5/98
to Alfonso López Almagro

Me parece que lo que quieres hacer es lo mismo que con el operador
variant de C, pasar
un número indeterminado de parámetros......

Lo siento pero que yo sepa no hay nada......

--
José Rubén jos...@asturies.org
"Out of Memory"
--------------------------

Alfonso López Almagro escribió:

Josep Garriga

unread,
Jun 9, 1998, 3:00:00 AM6/9/98
to Alfonso López Almagro

Try this...

function TFsequencials.inicialitza_Tsequencials(taula:ttable; const
camps : array of string ):boolean;
var
aux : integer;
begin
...
for aux:=low(camps) to high(camps) do
...

try

Pierre Gemis

unread,
Jun 9, 1998, 3:00:00 AM6/9/98
to

On 5 Jun 1998 14:01:00 GMT, "José León Serna" <t...@nigsun.es> wrote:

>Hola:
> Que yo sepa, se hace con arrays variables de parámetros:
>

Muy cierto, pero que yo sepa es obligatorio que el 'open array'
contenga por lo menos un elemento. No se puede pasar ni un array
vacío, ni omitir completamente los parametros...

Pierre Gemis

0 new messages