Hallo,
ich wolte nur einmal Fragen ob folgender Code
so richtig ist und oder ob es dazu
Verbesserungsvorschläge gibt.
Speziell geht es mir dabei um die AntiFreeze
Komponente. Auch würde mich interessieren
ob man in der uses Klausel auf IdBaseComponent
oder IdAntiFreezeBase verzichten kann.
Delphi-Quellcode:
var
IdHTTP: TIdHTTP; List: String;
IdAntiFreeze: TIdAntiFreeze;
begin
IdAntiFreeze:= TIdAntiFreeze.Create(nil);
IdHTTP:= TIdHTTP.Create(nil);
with IdHTTP do
begin
try
Host:= 'www.server.net';
Port:= 80;
Connect(5000);
List:= IdHTTP.Get('/');
Disconnect;
except
//nix
end;
end;
FreeAndNil(IdHTTP);
FreeAndNil(IdAntiFreeze);