O AWS4Delphi é um componente que possui alguns recursos de integração com os serviços da Amazon Web Services. É um componente desenvolvido para o Delphi.
# Passo 1: Adicionar no library path a pasta src
# Passo 2: Criar duas variáveis de ambiente de nível usuário (Windows):
TOKEN_AWS: {seu_token_aws}
SECRET_AWS {seu_secret_aws}
Obs.: Chaves criadas no console da AWS na página IAM (Identity and Access Management)
Na política dessa chave terá que dar permissão aos recursos: ses, s3, sns e mobiletargeting
# Passo 3: Na pasta do executável da sua aplicação adicionar as bibliotecas abaixo (ambas encontradas em samples\Files):
- AWS4Delphi.dll
- AWSSDK.Core.dll
- AWSSDK.Pinpoint.dll
- AWSSDK.S3.dll
- AWSSDK.SimpleEmail.dll
- MimeKit.dll
- Newtonsoft.Json.dll
- System.Memory.dll
- System.Runtime.CompilerServices.Unsafe.dll#Exemplo SMS
begin
TAmazonPinpoint.New
.SetPhoneNumber(lstDestinations.Items)
.SetMessage(Trim(edtMessage.Text))
.SetRegion(Trim(edtRegion.Text))
.SetAppId(Trim(edtAppId.Text))
.SendSMS(xResult);
end;
#Exemplo S3
begin
TAmazonS3.New
.SetFilePath(Trim(edtFilePath.Text))
.SetRegion(Trim(edtRegionS3.Text))
.SetBucketName(Trim(edtBucketName.Text))
.SendFile(xResult);
end;
#Exemplo Email
begin
TAmazonEmail.New
.SetRegion(Trim(edtRegionAWSEmail.Text))
.SetEmailSender(Trim(edtEmailSender.Text))
.SetRecipient(lstRecipient.Items)
.SetSubject(Trim(edtSubject.Text))
.SetMessageBody(Trim(edtMessageEmail.Text))
.SetFilePath(lstFilePath.Items)
.SendEmailWithFile(xResult);
end; - Delphi 10.4.2 - Sydney
- C#
- Programação Funcional
- Orientação a Objetos
- Comunicação com DLL
- Fique a vontade para contribuir com o projeto.
- Basta realizar o fork do projeto, evoluir/melhorar e solicitar um Pull Request.

