[Gambas-user] Callback

[tobias]

hi,

> Or, see code:
>
> To class named "Twotimes":
>
> Static Public Function _call(x As Integer) As Integer
>    Return x * 2
> End
>
>
> Then somewhere else:
>
> ''This is the function that accepts callbacks.
> Public Function testing(x As Integer, ofunc As Object) As Integer
>   Return ofunc(x)
> End
>
>
> ''Here is how to call it.
> Dim ChosenFunction As Object
>
> ChosenFunction = New Twotimes ''Here you can set the callback function.
> Print testing(2, ChosenFunction)
>
>
> Jussi
  this is a very pretty workaround. i'll use that!
thanks