http通信のタイムアウト値を必ず設定するよう変更

[gikonavigoeson/gikonavi.git] / Editor.pas

diff --git a/Editor.pas b/Editor.pas
index 1712ac9..6ae3425 100644 (file)
--- a/Editor.pas
+++ b/Editor.pas
@@ -736,9 +736,11 @@ begin
                http.ProxyParams.ProxyUsername := '';
                http.ProxyParams.ProxyPassword := '';
        end;
-       Indy.Request.UserAgent := GikoSys.GetUserAgent;
-       Indy.Request.AcceptEncoding := '';
-    Indy.AllowCookies := True;
+       http.Request.UserAgent := GikoSys.GetUserAgent;
+       http.Request.AcceptEncoding := '';
+    http.AllowCookies := True;
+    http.ReadTimeout := GikoSys.Setting.ReadTimeOut;
+    http.ConnectTimeout := GikoSys.Setting.ReadTimeOut;
 end;
 //! \91\97\90M\92\86\8e~\82Ì\82½\82ß\82Ì\83\81\83j\83\85\81[\82Ì\8dÄ\90¶
 procedure TEditorForm.CancelSend(ABoard: TBoard; ASysMenu: HMENU);