hi,
i was sick last Days so i have not Answer.
i thought DBF are "visible" in every Thread under harbour but like Xbase++ each Thread seem to have own Workspace.
now i have to find out how to "sync" Thread under harbour which i do under Xbase++ use "User-Def" Event
Code: Select all
PROCEDURE Thread_A
#define xbeMyPB_Base 0x79010000
#define xbeMyPB_DBLCLK (xbeMyPB_Base + 1)
#define xbeMyPB_GOTO (xbeMyPB_Base + 2)
PostAppEvent(xbeMyPB_GOTO, RECNO(), , Thread_B)
Code: Select all
PROCEDURE Thread_B
...
DO WHILE ( !lExit = .T. )
nEvt := AppEvent(@mp1,@mp2,@oo )
DO CASE
CASE nEvt = xbeMyPB_GOTO
GOTO(mp1)