Code: Alles auswählen
Pocedure Prd()
…
EndProcedure
Code: Alles auswählen
Pocedure Prd(*x)
Edit: Mit dem Aufruf stand ich etwas auf dem Schlauch.
Code: Alles auswählen
Pocedure Prd()
…
EndProcedure
Code: Alles auswählen
Pocedure Prd(*x)
Normalerweise funktioniert eine Funktion in etwa so
Code: Alles auswählen
Rückgabewert=Funktion(Parameter)
Code: Alles auswählen
Global thread,Back
Procedure MyThread(*return)
Delay(3000)
PokeI(*return,2)
EndProcedure
thread=CreateThread(@MyThread(),@Back)
While IsThread(thread)
Delay(500)
Debug "Waiting"
Wend
Debug "Return Value: "+Back