Al 18/09/13 10:08, En/na Michael Schnell ha escrit:
>
> sorry I forgot:
>
> *If the event queue is empty, **CheckSynchronize w**aits for an event to
> be pushed by a TThread or for /timeout/ Milliseconds to pass. If timeout
> is 0, it waits forever.*
If timeout is 0 it won't wait at all:
if timeout>0 then
begin
RtlEventWaitFor(SynchronizeTimeoutEvent,timeout);
end
else
RtlEventResetEvent(SynchronizeTimeoutEvent);
Bye
--
Luca
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel
