procedure TfmTestDownloader.btDownLoadClick(Sender: TObject); begin clDownloader1.URL := 'http://www.clevercomponents.com/images/testimage.jpg'; clDownloader1.LocalFolder := 'c:\downloads'; clDownLoader1.Start(False); case clDownLoader1.ResourceState.LastStatus of psSuccess: ShowMessage('Process completed successfully'); psFailed: ShowMessage((Sender as TclDownLoader).Errors.Text); psTerminated: ShowMessage('Process stopped'); psErrors: ShowMessage('Process completed with some warnings'); end; end;
Trouble logging in? Simply enter your email address OR username in order to reset your password.
For faster and more reliable delivery, add admin@clevercomponents.com to your trusted senders list in your email software.