// Build an S3 Request.
var GetObjectRequest := TS3GetObjectRequest.Create('my-bucket', 'my-object')
as IS3GetObjectRequest;
// Build the Presigner and Request
var Presigner := TS3Presigner.Create
as IS3Presigner;
var PresignerRequest := TS3PresignerRequest.Create(GetObjectRequest)
as IS3PresignerRequest;
Specify any options such
as ExpiresIn.
PresignerRequest.ExpiresIn := 604800;
// 1 Week
// Presign the URL
var PresignedUrl := Presigner.PresignedUrl(PresignerRequest);