OnResponse event
|
OnResponse event
|
|
| SendMail component.
|
| type
|
| TSMTPResponseEvent = procedure(Sender: TObject; Code: Integer; const Response: String) of object;
|
|
|
| property OnResponse: TSMTPResponseEvent;
|
| The OnResponse event occurs every time when component receives the response for SMTP request from server. The response contains the status information (code and optional text) of request.
|
|
|
| For more information about status codes of SMTP protocol see RFC 821.
|
| procedure TForm1.SendMail1Response(Sender: TObject; Code: Integer;
|
| const Response: string);
|
| begin
|
| with ListView1 do // status view
|
| begin
|
| Items.Add(Response);
|
| ItemIndex := Items.Count - 1;
|
| end;
|
| end;
|
| OnSMTPError, OnSuccess and OnProgress events.
|