![]() |
![]() ![]() ![]() |
acAutoUpgrader, acHTTP and acSendMail components.
|
type
|
TacAUHostUnreachableEvent = procedure(Sender: TObject;
|
const URL, Hostname: String) of object;
|
|
property OnHostUnreachable: TacAUHostUnreachableEvent;
|
The OnHostUnreachable event occurs if the AutoUpgrader can not connect to some remote host. The unreachable host passes in Hostname parameter and full path to inaccessible file in the URL parameter.
|
|
Possible reasons of this problem is:
|
1. | User currently not connected to the Internet;
|
2. | Requested host name is unknown. Please check spelling of domain name in the InfoFileURL property and in URLs listed in the file which contains upgrade information, or in the Files list of InfoFile structure;
|
3. | Remote server is down (disconnected from Internet).
|
|
![]() |
procedure TForm1.acAutoUpgrader1HostUnreachable(Sender: TObject;
|
URL, Hostname: string);
|
begin
|
Application.MessageBox(PChar('Host http://' + Hostname + ' is unreachable.'#13#13'Please check your Internet connection and'#13'try to upgrade this software again later.'),
|
PChar(Application.Title),
|
MB_OK or MB_ICONSTOP);
|
end;
|
void __fastcall TForm1::acAutoUpgrader1HostUnreachable(TObject *Sender, AnsiString URL, AnsiString Hostname)
|
{
|
AnsiString Msg =
|
"Host http://" + Hostname + " is unreachable.\n\n"
|
"Please check your Internet connection and\n"
|
"try to upgrade this software again later.";
|
Application->MessageBox(Msg.c_str(),
|
Application->Title.c_str(),
|
MB_OK | MB_ICONSTOP);
|
}
|
InfoFIleURL and ShowMessages properties;
|
Files property in the InfoFile structure; Info-file example;
|
Hostname property of acHTTP component.
|