hi,
was ist denn da bitte falsch?
Egal ob ich per Firewall das Programm blocke oder nicht,
es wirft imemr eine
access denied raise
exception von
Indy, aber try except trifft nie ein, sprich:
var_Newsticker := 'You are not connected to the Internet (or your Firewall is blocking me) or my Homepage is down. Look for Help and Updates @ www.xyz.com';
trifft nie ein und bleibt somit leer!
Warum?
Delphi-Quellcode:
IdHTTPUpdate.ReadTimeout := 3000;
IdHTTPUpdate.ConnectTimeout := 3000;
if InternetGetConnectedState(nil, 0) then
try //1
masterserver := IdHTTPUpdate.Get(masterserver);
masterserver := StringsucheVor(masterserver,'<frame src="','"');
onlineSettings := IdHTTPUpdate.Get(masterserver+'EasyMangosHandler/onlinesettings.ini');
finally
try //2
AktuelleVersion := StringsucheVor(onlineSettings,'Version=<','>');
var_Newsticker := StringsucheVor(onlineSettings,'News=<','>');
var_Maps_download := StringsucheVor(onlineSettings,'Maps_Download=<','>');
DownloadLink := StringsucheVor(onlineSettings,'DownloadLink=<','>');
Changelog := StringsucheVor(onlineSettings,'Changelog=<','>');
except //2
var_Newsticker := 'You are not connected to the Internet (or your Firewall is blocking me) or my Homepage is down. Look for Help and Updates @ www.xyz.com';
end;
end else //1
begin
var_Newsticker := 'You are not connected to the Internet (or your Firewall is blocking me) or my Homepage is down. Look for Help and Updates @ www.xyz.com';
end;