FiveTech Support Forums

Work under xHarbour functions are multi-threaded such as StartThread() / StopThread() ?

xHarbour seems to support multithread. What do you want to know exactly?

EMG

Want to learn how you can create a new thread (with the function StartThread() failed)

Do you get any error messages?

EMG

I don't get errors, just nothing happens.
I tried to run the examples with StartThread(), but instead of thread handle this function returns empty.
for example:

PROCEDURE Main
LOCAL pThread

  CLS
  USE Customer
  pThread := StartThread( "ShowTime", 0, MaxCol()-7 )

  Browse()

  StopThread( pThread )

  WaitForThreads()

RETURN

PROCEDURE ShowTime( nRow, nCol )
DO WHILE .T.
DispOutAt( nRow, nCol, Time() )
ThreadSleep( 1000 )
ENDDO
RETURN

Just tried: works fine here.

EMG

Some details:

• I'm using latest xHarbour from SVN and BCC 7.10
• I had to link cw32mt.lib and vmmt.lib

EMG

Hm.. similarly, but does not work. I will think

Enrico, thank for your help !

I create a thread th:=Startthread() and open DIALOG . After doing the main thread I close my thead StopThread(th) or KillThread(th). But apparently the DIALOG in the thread is not closed and when you try to create a thread I get the error WINDOWS