Data.Cloud.AmazonAPI.TAmazonStorageService

Aus RAD Studio API Documentation
Wechseln zu: Navigation, Suche

Data.Cloud.AmazonAPI.TAmazonServiceData.Cloud.CloudAPI.TCloudServiceSystem.TObjectTAmazonStorageService

Delphi

TAmazonStorageService = class(TAmazonService)

C++

class PASCALIMPLEMENTATION TAmazonStorageService : public TAmazonService

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 zum Dienst Amazon Simple Storage Service (S3).

Diese Klasse stellt Methoden zum Verwalten von Buckets und Objekten bereit. Einige der wichtiger Methoden sind:

In der TAmazonStorageService-API-Dokumentation finden Sie eine Liste aller verfügbaren Methoden.

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

Hinweis: In Amazon Simple Storage Service (S3) gibt es kein Ordnerkonzept. Es gibt Möglichkeiten zur Verwaltung von Objekten, sodass sie die "Ordnerstruktur" zu verwenden scheinen. Weitere Informationen finden Sie unter Objects:Object Key and Metadata (EN).

Das folgende Codefragment zeigt, wie mit der TAmazonStorageService-API ein neues Bucket erstellt wird:

Delphi:
var
  ResponseInfo: TCloudResponseInfo;
  StorageService: TAmazonStorageService;
  BucketName:String;
begin
  BucketName := 'my-bucket-name-vjsep967w37'; // the bucket name must be unique
  StorageService := TAmazonStorageService.Create(AmazonConnectionInfo1);
  ResponseInfo := TCloudResponseInfo.Create;
  try
    if StorageService.CreateBucket(BucketName, amzbaNotSpecified, amzrNotSpecified, ResponseInfo) then
      Memo1.Lines.Append('Success! Bucket: ' + BucketName + ' created.')
    else
      Memo1.Lines.Append(Format('Failure! %s', [ResponseInfo.StatusMessage]));
  finally
    StorageService.Free;
    ResponseInfo.Free;
  end;
end;
C++:
TCloudResponseInfo *ResponseInfo;
String BucketName;
TAmazonStorageService *StorageService;
BucketName = "my-bucket-name-vjsep967w37"; // the bucket name must be unique
StorageService = new TAmazonStorageService(AmazonConnectionInfo1);
ResponseInfo = new TCloudResponseInfo;
try
{
  if (StorageService->CreateBucket(BucketName, amzbaNotSpecified, amzrNotSpecified, ResponseInfo))
  {
    Memo1->Lines->Append("Success! Bucket: " + BucketName + " created.");
  }
  else
  {
    TVarRec args[1] = {ResponseInfo->StatusMessage};
    Memo1->Lines->Append(Format("Failure! %s", args, 0));
  }
}
__finally
{
  delete StorageService;
  delete ResponseInfo;
}

Siehe auch