TsgcWSPClient_AMQPEvents › OnAMQPQueuePurge

OnAMQPQueuePurge Event

Fires when the server confirms that a queue has been purged (queue.purge-ok).

Syntax

property OnAMQPQueuePurge: TsgcAMQPQueuePurgeEvent;
// TsgcAMQPQueuePurgeEvent = procedure(Sender: TObject; const aChannel, aQueue: string; aMessageCount: Integer) of object

Default Value

Remarks

Raised in response to PurgeQueue. aMessageCount is the number of messages that were discarded from aQueue. Only ready (non-delivered) messages are purged; messages currently delivered to consumers and pending acknowledgement are not affected.

Example

procedure TForm1.oAMQPAMQPQueuePurge(Sender: TObject;
  const aChannel, aQueue: string; aMessageCount: Integer);
begin
  DoLog(Format('#AMQP Queue %s purged (%d messages)', [aQueue, aMessageCount]));
end;

Back to Events