delphi tidhttp 시간 초과 해결 방안

2219 단어
  delphi    xe10.1 ,tidhttp    ,                           ,          10-20 。connectTimeout readTimeout    ,      ,        ,   ,     。
idhttp.get , , , 。
 1 strResult:='';
 3 Tthread.CreateAnonymousThread(
 4  procedure
 5  begin
 6    strResult := idhttp.get('url');
 7 end).Start;
 8  
 9 for i := 0 to 4 do
10 begin
11   if strResult<>'' then
12             break;
13   application.ProcessMessages;
14   Tthread.Sleep(500);
15   application.ProcessMessages;
16 end;

좋은 웹페이지 즐겨찾기