Can someone tell me why "NSThread threadPriority" doesn't work?
Code: Select all
Procedure MyProcedure(*Value)
V.f
P.f = 0.6
CocoaMessage(@R, 0, "NSThread setThreadPriority:@" , @P) ; from 0.0 to 1.0, where 1.0 is highest priority.
If R
CocoaMessage(@V, 0, "NSThread threadPriority")
Debug V ;should be 0.6
For x=0 To 100
Delay(5)
Next
EndIf
Debug "end thread " +R
EndProcedure
Thread = CreateThread(@MyProcedure(), 0)
Debug "running..."
Repeat
Delay(10)
Until IsThread(Thread) = 0