Data.Cloud.AmazonAPI.TAmazonQueueService

• Übergeordnet: Data.Cloud.AmazonAPI
• Methoden
• Eigenschaften
• Felder
• Typen

Delphi

TAmazonQueueService = class(TAmazonBasicService)

C++

class PASCALIMPLEMENTATION TAmazonQueueService : public TAmazonBasicService

Eigenschaften

Typ	Sichtbarkeit	Quelle	Unit	Übergeordnet
class	public	Data.Cloud.AmazonAPI.pas Data.Cloud.AmazonAPI.hpp	Data.Cloud.AmazonAPI	Data.Cloud.AmazonAPI

Beschreibung

Ermöglicht die Verbindung zu Amazon Simple Queue Service (SQS).

Mit den Methoden dieser Klasse können Sie:

• Warteschlangen verwalten:
  • Eine Warteschlange erstellen oder löschen.
  • Vorhandene Warteschlangen auflisten.
  • Warteschlangenberechtigungen hinzufügen oder entfernen.
  • Die Eigenschaften einer Warteschlange ermitteln oder festlegen.
• Meldungen verwalten:
  • Dem Queue eine Nachricht hinzufügen.
  • Eine einzelne Nachricht von einem Queue löschen oder alle Nachrichten in einem Queue löschen.
  • Die Sichtbarkeit einer Meldung ändern.
  • Meldungen abrufen oder anzeigen.
  • Die maximale Anzahl von Meldungen ermitteln, die von einer Warteschlange abgerufen werden können.

Zusätzlich stellt TAmazonQueueService Methoden bereit, die die Antwort in einem XML-Format zurückgeben:

• ListQueuesXML
• GetMessagesXML
• GetQueuePropertiesXML

Weitere Informationen über die API Amazon Simple Queue Service (SQS) finden Sie in der offiziellen Dokumentation zu Amazon Simple Queue Service (EN).

Das folgende Codefragment zeigt, wie mit der Klasse TAmazonQueueService eine neue Warteschlange erstellt wird:

Delphi:

var
  ResponseInfo: TCloudResponseInfo;
  QueueURL: String;
  QueueService: TAmazonQueueService;
begin
  QueueService := TAmazonQueueService.Create(AmazonConnectionInfo1);
  ResponseInfo := TCloudResponseInfo.Create;
  try 
    if QueueService.CreateQueue('QueueName', QueueURL, -1, ResponseInfo) then
      Memo1.Lines.Append('Success! QueueURL: ' + QueueURL);
    else
      Memo1.Lines.Append(Format('Failure! %s', [ResponseInfo.StatusMessage]));
  finally
    QueueService.Free;
    ResponseInfo.Free;
  end;
end;

C++:

TCloudResponseInfo *ResponseInfo;
String QueueURL;
TAmazonQueueService *QueueService;
QueueService = new TAmazonQueueService(AmazonConnectionInfo1);
ResponseInfo = new TCloudResponseInfo;
try
{
    if (QueueService->CreateQueue("testqueue", QueueURL, -1, ResponseInfo))
    {
        Memo1->Lines->Append("Success! QueueURL: " + QueueURL);
    }
    else
    {
        TVarRec args[1] = {ResponseInfo->StatusMessage};
        Memo1->Lines->Append(Format("Failure! %s", args, 0));
    }
}
__finally
{
    delete QueueService;
    delete ResponseInfo;
}

Siehe auch

• Mit einem Nicht-Standardbereich verbinden

• Data.Cloud.AmazonAPI.TAmazonStorageService
• Data.Cloud.AmazonAPI.TAmazonTableService

• Data.Cloud.AmazonAPI.TAmazonConnectionInfo

• Amazon Simple Queue Service Documentation (EN)