OnResponse event
|
OnResponse event
|
|
| acSendMail component.
|
| type
|
| TacSMTPResponseEvent = procedure(Sender: TObject; Code: Integer; const Response: String) of object;
|
|
|
| property OnResponse: TacSMTPResponseEvent;
|
| 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.acSendMail1Response(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.
|