MinIO4Delphi
1.0.0
https://min.io/
Crie as informações de conexão Minio da mesma maneira que você cria as informações de conexão da Amazon:
var
LConnInfo: TMinIOConnectionInfo;
...
LConnInfo := TMinIOConnectionInfo.Create(nil);
LConnInfo.AccountKey := 'your_private_key';
LConnInfo.AccountName := 'your_public_key';
LConnInfo.StorageEndPoint := 'your_endpoint';
LConnInfo.UseDefaultEndpoints := false;
Crie o serviço de armazenamento Minio da mesma maneira que você cria o serviço de armazenamento da Amazon:
var
LService: TMinIOStorageService;
...
LService := TMinIOStorageService.Create(LConnInfo);
Use -o da maneira convencional e as abstrações de implementação:
...
LService.UploadFile('your_bucket_name', 'local_file_path', 'remote_file_name');
LService.DeleteObject('your_bucket_name', 'remote_file_name');
...