Hallo Leute,
Ich nutze noch delphi 9 unter Windows 10.
Ich frage bei Goole Maps Routen an und parse mir daraus die Entfernung.
z.b.:
https://www.google.de/maps/dir/01589...04103+Leipzig/
Nutze dazu InternetOpenUrl die sich in der WinInet befindet.
Programm ist fertig und funktioniert bei mir super.
Jetzt auf einen anderen Computer probiert und plötzlich bekomme ich nicht den
gewollten Quelltext sondern Google will das Cookies zugestimmt wird.
Auf was greift den InternetOpenUrl zu das es bei mir die Zustimmung umgeht und auf dem anderen Rechner nicht?
Hatte schon etwas gelesen das der IE intern dafür benutzt wird aber ich nutze Firefox und im IE
habe ich den Cookies nicht zugestimmt.
Folgende Form habe ich gewählt. ( nur mal ein Auszug das ihr seht welche Funktionen ich nutze )
Code:
hSession := InternetOpen('MyApp', INTERNET_OPEN_TYPE_PRECONFIG, nil, nil,
hService := InternetOpenUrl(hSession, PChar(aUrl), nil, 0, 0, 0);
if Assigned(hService) then
begin
dwBytesRead := 1024;
repeat
InternetReadFile(hService, @lpBuffer, 1024, dwBytesRead);
if dwBytesRead <> 0 then
begin
lpBuffer[dwBytesRead] := #0;
aStream.WriteBuffer(lpBuffer, dwBytesRead);
end;
until dwBytesRead = 0;
FreeAndNil(aStream);
InternetCloseHandle(hService);
InternetCloseHandle(hFTP);
InternetCloseHandle(hSession);
end