[Fonction] Paramètre facultatif

[Progi1984]

Slt
Comment puis je faire pour mettre à une fonction un parmaètre facultatif ?

Genre

Code : Tout sélectionner

Procedure MaFonction(var1.l, var2.s="rien")
endprocedure

Donc si on appelle MaFonction(18), la variable var2 prendra "rien" comme contenu.

Une idée ?

[Dr. Dri]

Y'a qu'avec les userlibs que c'est faisable pour le moment, mais le sparametres optionnels ont été évoqués par Fred

Dri

[Progi1984]

C'est cool !

Merci Doc Dri

[Droopy]

Voila comment je procède avec Tailbite :

Code : Tout sélectionner

ProcedureDLL Test3(FirstLine.s,SecondLine.s)
  If SecondLine<>"" : FirstLine+#CR$ : EndIf
  
  MessageRequester("Test",FirstLine+SecondLine)
EndProcedure

ProcedureDLL Test2(FirstLine.s)
  Test3(FirstLine,"2nd Empty")
EndProcedure

ProcedureDLL Test()
  Test3("1st Empty","2nd Empty")
EndProcedure