Z zqw0117 Unregistered / Unconfirmed GUEST, unregistred user! 2006-08-20 #3 它抛出异常就表示没有获得成功,不抛出异常就成功了 var Code: string; Done: Boolean; begin try Code := idHTTP1.Get('yoururl'); Done := True; except Done := False; end; if Done then //成功 ShowMessage(Code); end;
它抛出异常就表示没有获得成功,不抛出异常就成功了 var Code: string; Done: Boolean; begin try Code := idHTTP1.Get('yoururl'); Done := True; except Done := False; end; if Done then //成功 ShowMessage(Code); end;