ギコナビ
| Revision | 3480c56ac29631aafdde3b51c9b23f5078b67e1e (tree) |
|---|---|
| Zeit | 2011-09-25 12:47:55 |
| Autor | h677 <h677> |
| Commiter | h677 |
ネットワークがオフラインの時に、送信で例外が発生する不具合の修正
Editor.pas (diff)| @@ -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); |
sado
Fork