DLL avec parametre optionnel

Salut :)

Je cherche a crée une fonction dans une dll, cette fonction aurait des parametre optionnelle.
exemple :
function somme (var1:integer; var2:integer; var3:integer; var4:integer);
var1 et var2 etant obligatoire mais var3 et var4 non !

le programme appelant pourrait appellé
somme (1,2);
somme (1,2,3);
somme (1,2,3,4);

je pensais a declaré en fait plusieur fonction du meme nom mais avec un prototype different.

function somme (var1:integer; var2:integer);
function somme (var1:integer; var2:integer; var3:integer);
function somme (var1:integer; var2:integer; var3:integer; var4:integer);

Est ce possible en delphi ?

Merci d'avance... :P

[edit]
A priori je ne connais pas le language appelant, mais il est fort possible que cela depend bcp du langage appelant. Par exemple en specifiant des valeurs par defaut pour certain parametre.

Utilise la directive overload de la façon suivante :

Code:

---

1 2 3 4

type procedure somme(x: integer);overload; procedure somme(x,x1: integer);overload;

---

Code:

---

1 2 3 4 5 6 7 8 9 10

procedure somme(x: integer); begin // traitement end; procedure somme(x,x1: integer); begin //traitement end;

---

Pour les paramètres facultatifs, tu peux également procéder ainsi:

Code:

---

1 2 3 4

procedure somme1(x,x1: integer; x2 : integer = 0); //x2 vaudra 0 par défaut et il ne sera pas nécéssaire de le renseigner //sinon il prendra la valeur qu'on lui passera

---

Tu peux à la fois appeler
somme1(5,7); //x2 vaudra 0 par défaut
ou
somme(5,7,11); //x2 vaudra 11 ici

Cordialement

Merci grand gourou :mrgreen:

J'essaie ca tout de suite :)

Soit pour répondre complètement à ton problème

Code:

---

1 2 3 4 5 6 7 8 9 10 11

type procedure somme(x,x1: integer; x2: integer = 0; x3: integer = 0); implementation procedure somme(x,x1: integer; x2 : integer = 0; x3: integer = 0); begin //Traitement end;

---

Cordialement