Circular.Read (gb.data)

Function Read ( ) As Variant

Ler um valor, ou seja, devolver o elemento no ponteiro de leitura e faz avançar o ponteiro. Se o ponteiro de leitura atinge o ponteiro de escrita (o Circular torna-se vazio), NULL é retornado.

Você atualmente não pode "bloquear" elementos em leitura. Se necessário, considere usar um PIPE.

Veja também