Passage d'un array en paramètre d'une procédure
Publié : ven. 09/nov./2012 17:50
Code : Tout sélectionner
Procedure EchoArray(MyArray.s(1))
For x.l = 0 To 3
Debug MyArray(x)
Next x
EndProcedureForums PureBasic - Français
https://www.purebasic.fr/french/
Code : Tout sélectionner
Procedure EchoArray(MyArray.s(1))
For x.l = 0 To 3
Debug MyArray(x)
Next x
EndProcedureCode : Tout sélectionner
Procedure EchoArray(Array MyArray.s(1))
size = ArraySize(MyArray())
For x.l = 0 To size
Debug MyArray(x)
Next x
EndProcedure
Dim MonArray.s(45)
For tmp_a = 0 To 45
MonArray(tmp_a) = Chr(48 + tmp_a)
Next
EchoArray(MonArray())