Ich möchte gerne einen Connection Timeout machen. Da mir der Http Client vom Komponent selber keine Fehlermeldung ausspuckt.
Hab schon was versucht:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
timer1.Enabled := false;
timer2.enabled := true;
Memo1.Lines.Add(Timetostr(time) + ' make a connect ! ');
httpcli1.get;
end;
procedure TForm1.Timer2Timer(Sender: TObject);
begin
httpcli1.Abort;
Memo1.Lines.Add(Timetostr(time) + ' making a new connect ! ');
timer1.Enabled := true;
timer2.Enabled := false;
end;
das macht er aber nicht

woran liegt es ?