var S3: IS3Client; Waiter: IS3BucketWaiter; begin S3 := TS3Client.Create; Waiter := TSBucketExistsWaiter.Create(S3); Waiter.Wait('a-bucket-name').IsSuccessful then begin // Bucket exists. end; end;