X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=Editor.pas;fp=Editor.pas;h=aeb7304ecd446323f676d3169b1a60b3351616ce;hb=3480c56ac29631aafdde3b51c9b23f5078b67e1e;hp=4258d8d99b87bfd49572845fee658a85f3d449ca;hpb=ad4fcaeb8f5311ebca6982602b3887fad08aac83;p=gikonavigoeson%2Fgikonavi.git
diff --git a/Editor.pas b/Editor.pas
index 4258d8d..aeb7304 100644
--- a/Editor.pas
+++ b/Editor.pas
@@ -928,6 +928,14 @@ begin
raise Exception.Create('');
end;
except
+ on E: EIdSocketError do begin
+ State := gdsError;
+ ResponseText := ''
+ + 'Ú±ª¸sµÜµ½
'
+ + 'ñüâvLVÌóÔð²×ľ³¢
'
+ + '
' + E.Message + '
'
+ + '';
+ end;
on E: EIdConnectException do begin
State := gdsError;
ResponseText := ''
@@ -962,7 +970,9 @@ begin
finally
Source.Free;
TextStream.Free;
- Indy.CookieManager.CookieCollection.Clear;
+ if ( Indy.CookieManager <> nil ) then begin
+ Indy.CookieManager.CookieCollection.Clear;
+ end;
//sysMenu := GetSystemMenu( Handle, true );
EnableMenuItem(SysMenu, SC_CLOSE, MF_BYCOMMAND or MF_ENABLED);
DrawMenuBar(Handle);