TsgcWSPClient_STOMP_RabbitMQ › Events › OnRabbitMQError
Fires when an ERROR frame is received from the RabbitMQ broker; delivers the error message and the full ERROR Headers.
property OnRabbitMQError: TsgcWSRabbitMQSTOMPErrorEvent;
// TsgcWSRabbitMQSTOMPErrorEvent = procedure(Connection: TsgcWSConnection; MessageText: String; Headers: TsgcWSRabbitMQSTOMPHeadersError) of object
—
Raised when the RabbitMQ broker sends an ERROR frame. The broker will normally close the connection after sending an ERROR, so the session should be considered terminated. Parameters:
procedure TForm1.RabbitMQError(Connection: TsgcWSConnection;
MessageText: String; Headers: TsgcWSRabbitMQSTOMPHeadersError);
begin
Memo1.Lines.Add('RabbitMQ error: ' + MessageText);
if Headers.ReceiptId <> '' then
Memo1.Lines.Add(' (related to receipt ' + Headers.ReceiptId + ')');
end;