idhttp (hvor står den efter navigering "endup-url")
Hej. Jeg henter source fra nettet ind i en TMemo vha nedenstående eksempel. Når den har smidt koden ind i memo-boksen, vil jeg gerne have den endelige url skrevet ind i et panel. Det virker også næsten, men jeg får kun "hoved-domænet" skrevet ud.Hvis jeg indtaster eks: http://www.mbsnet.dk/?loc=articles
så udskriver den kun: http://www.mbsnet.dk
Dette er jo træls når den redirecter osv, at den mangler alle parametrene..
Kan man erstatte idhttp1.host til noget andet, eller gøre det under event måske ?
procedure TForm1.Button1Click(Sender: TObject);
begin
panel1.caption:='';
try
memo1.text:=idhttp1.Get(edit1.text);
panel1.caption:='Url til sidst: '+web.host;
except
panel1.caption:='Fejl...';
end;
end;
{har sat idhttp1 komponentens HandleRedirects til TRUE}
/mbs
