Data.Cloud.AmazonAPI.TAmazonStorageService

• Aller au parent : Data.Cloud.AmazonAPI
• Méthodes
• Propriétés
• Champs

Delphi

TAmazonStorageService = class(TAmazonService)

C++

class PASCALIMPLEMENTATION TAmazonStorageService : public TAmazonService

Propriétés

Type	Visibilité	Source	Unité	Parent
class	public	Data.Cloud.AmazonAPI.pas Data.Cloud.AmazonAPI.hpp	Data.Cloud.AmazonAPI	Data.Cloud.AmazonAPI

Description

Vous permet d'établir une connexion au service Amazon Simple Storage Service (S3).

Cette classe fournit des méthodes qui vous permettent de gérer des compartiments et des objets. Les méthodes les plus importantes sont notamment les suivantes :

• CreateBucket
• DeleteBucket
• ListBuckets
• GetBucket
• CopyObject
• DeleteObject
• GetObject
• GetObjectTorrent
• GetObjectProperties
• InitiateMultipartUpload

Voir la documentation API TAmazonStorageService pour une liste de toutes les méthodes disponibles.

Pour plus d'informations sur l'API Amazon Simple Storage Service (S3), voir la documentation officielle Amazon Simple Storage Service (EN).

Remarque : Le concept de dossier n'existe pas dans Amazon Simple Storage Service (S3). Il existe trois moyens de gérer les objets de manière à ce qu'ils semblent utiliser la "structure de dossiers". Lire Objects:Object Key and Metadata (EN) pour plus d'informations.

L'extrait de code suivant montre comment créer un nouveau compartiment en utilisant l'API TAmazonStorageService :

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;
}

Voir aussi

• Connexion à une région pas par défaut

• Data.Cloud.AmazonAPI.TAmazonQueueService
• Data.Cloud.AmazonAPI.TAmazonTableService

• Data.Cloud.AmazonAPI.TAmazonConnectionInfo

• Documentation Amazon Simple Storage Service (EN)