Wish Resumable Sub with any type of return

[narek adonts]

Would be great if it will be possible something like this

Sub Test as MyClassName

dim a, b As int

a=1
sleep(1000)
b=2
sleep(1000)

return  Me

End sub

The code is inside MyClass

To be able to return a Class when using sleep or WaitFor

 

[XbNnX_507]

Declare sub test as Resumable Sub

public Sub Test As ResumableSub

    Dim a, b As Int

    a=1
    Log ( "a is: " & a )
    Sleep(1000)
    b=2
    Log ( "b is : " & b )
    Sleep(1000)

    Log ( "now returning class ")
    Return  Me

End Sub

Then when you call it
it must be

    Dim i As MyClassName
    i.Initialize
    Wait For (i.Test) Complete ( instanceClass As MyClassName)
    Log ( instanceClass )

 

[narek adonts]

Declare sub test as Resumable Sub

public Sub Test As ResumableSub

    Dim a, b As Int

    a=1
    Log ( "a is: " & a )
    Sleep(1000)
    b=2
    Log ( "b is : " & b )
    Sleep(1000)

    Log ( "now returning class ")
    Return  Me

End Sub

Then when you call it
it must be

    Dim i As MyClassName
    i.Initialize
    Wait For (i.Test) Complete ( instanceClass As MyClassName)
    Log ( instanceClass )

Return Me will not work if u use Sleep or WaitFor

 

[XbNnX_507]

Return Me will not work if u use Sleep or WaitFor

It's working here. Did you test the code ?

 

[narek adonts]

It's working here. Did you test the code ?

The issue that i need it to call Sleep in a sub which is returning a class

 

[XbNnX_507]

The issue that i need it to call Sleep in a sub which is returning a class

Then it must be a B4i only related problem or bug.
in B4a and b4J it works fine.

 

[Erel]

As written above you can return any value you like from a resumable sub. The declared type must be ResumableSub.