Jest sobie taki oto kod:
i pojawiają się dwa problemy:
1. Podczas wywoływania Head lub Get np dla strony http://www.google.pl/ pojawia się w Delphi komunikat:
Który jednak nie przedostaje się dalej i nie ma wpływu na blok try..except
2. Pobrana treść jest od pewnego (zawsze podobnego) fragmentu zniszczona, i wygląda jak w załączniku (zapis debugera Delphi); poniżej newralgiczny fragment z okolic linii 4, kolumny 2550 wyniku otrzymanego przez przeglądarkę):
Czy ja robię coś nie tak?
var
PageContent: String;
begin
try
IdHTTP.Head(Page);
if (IdHTTP.ResponseCode<>200) or (Copy(IdHTTP.Response.ContentType,1,9)<>'text/html') then Exit;
PageContent:=IdHTTP.Get(Page);
except
Exit;
end;
if (IdHTTP.ResponseCode<>200) or (Copy(IdHTTP.Response.ContentType,1,9)<>'text/html') then Exit;
i pojawiają się dwa problemy:
1. Podczas wywoływania Head lub Get np dla strony http://www.google.pl/ pojawia się w Delphi komunikat:
Cytat:---------------------------
Debugger Exception Notification
---------------------------
Project PRProject.exe raised exception class EConvertError with message 'Invalid argument to date encode'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------
Który jednak nie przedostaje się dalej i nie ma wpływu na blok try..except
2. Pobrana treść jest od pewnego (zawsze podobnego) fragmentu zniszczona, i wygląda jak w załączniku (zapis debugera Delphi); poniżej newralgiczny fragment z okolic linii 4, kolumny 2550 wyniku otrzymanego przez przeglądarkę):
Cytat:<span class=gb2><div></div></a'#$12#0'D'#0'ć'#0#0#0#0#0#0#0'T'#$11#$19'ž'#$14#$C'ˇ'#2'`_J'#0'0ŕ'#$B#3',î›'#2
Czy ja robię coś nie tak?
