Data.Cloud.AmazonAPI.TAmazonStorageService

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:
- CreateBucket
- DeleteBucket
- ListBuckets
- GetBucket
- CopyObject
- DeleteObject
- GetObject
- GetObjectTorrent
- GetObjectProperties
- InitiateMultipartUpload
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;
}