Acho que não vai precisar disso:
/ nEvent := 0
// nTime := Hb_MilliSeconds()
//
// DO WHILE nEvent == 0 .AND. Hb_MilliSeconds() - nTime < 10000
// Hb_idleSleep( 0.5 )
// /* The following dummy line is required to allow COM server to send event [Mindaugas] */
// h
// ENDDO