Fertig ist das allgemeine Client-Interface
Delphi-Quellcode:
Type
IClientConnection =
Interface
procedure StartConnection (server : IServer);
procedure SendMessage (
message :
String);
procedure QueryResponse (
query :
String;
var response :
String; timeout : Integer);
procedure StopConnection;
end;
Oder auch so:
Delphi-Quellcode:
type
IConnection = interface
procedure Start;
procedure Send(AMessage: string);
function Receive(ATimeout: Integer): string;
procedure Stop;
end;
IMessageBrokerClient = interface
function CreateConnection: IConnection;
...
end;
Im Interface fehlt noch die Angabe des Queuenamens (oder allgemeiner: Destinationnamens, da es neben Queues auch Topics oder Channel gibt, die Begriffe sind nicht einheitlich über alle Broker). Man könnte den Destinationnamen zum Beispiel als Argument beim Erzeugen der Connection übergeben.