ギコナビ
修訂 | 3480c56ac29631aafdde3b51c9b23f5078b67e1e (tree) |
---|---|
時間 | 2011-09-25 12:47:55 |
作者 | h677 <h677> |
Commiter | h677 |
ネットワークがオフラインの時に、送信で例外が発生する不具合の修正
@@ -928,6 +928,14 @@ begin | ||
928 | 928 | raise Exception.Create(''); |
929 | 929 | end; |
930 | 930 | except |
931 | + on E: EIdSocketError do begin | |
932 | + State := gdsError; | |
933 | + ResponseText := '<html><body>' | |
934 | + + '<div>Ú±ª¸sµÜµ½<br>' | |
935 | + + 'ñüâvLVÌóÔð²×ľ³¢<br></div>' | |
936 | + + '<br><br><div>' + E.Message + '</div>' | |
937 | + + '</body></html>'; | |
938 | + end; | |
931 | 939 | on E: EIdConnectException do begin |
932 | 940 | State := gdsError; |
933 | 941 | ResponseText := '<html><body>' |
@@ -962,7 +970,9 @@ begin | ||
962 | 970 | finally |
963 | 971 | Source.Free; |
964 | 972 | TextStream.Free; |
965 | - Indy.CookieManager.CookieCollection.Clear; | |
973 | + if ( Indy.CookieManager <> nil ) then begin | |
974 | + Indy.CookieManager.CookieCollection.Clear; | |
975 | + end; | |
966 | 976 | //sysMenu := GetSystemMenu( Handle, true ); |
967 | 977 | EnableMenuItem(SysMenu, SC_CLOSE, MF_BYCOMMAND or MF_ENABLED); |
968 | 978 | DrawMenuBar(Handle); |