X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=Giko.pas;h=416e3e9d479a1eb02856b101f0ef03e0c0a59f28;hb=154bdc442dc28aff5180325d07b6875fd4cde418;hp=037d50502c0734a45c8fbc62a66a1d4965f124bd;hpb=93005d31485973b722989dbc71bde70ca4d0db84;p=gikonavigoeson%2Fgikonavi.git diff --git a/Giko.pas b/Giko.pas index 037d505..416e3e9 100644 --- a/Giko.pas +++ b/Giko.pas @@ -2317,6 +2317,12 @@ begin KokoPopupMenu.Popup(p.x, p.y); end else if Pos('mailto', LowerCase(URL)) <> 0 then begin Cancel := not GikoSys.Setting.OpenMailer; + + //@‚Æ.‚ðŠÜ‚Ü‚È‚¢URL‚̓[ƒ‹ƒAƒhƒŒƒX‚Æ‚Ý‚È‚³‚È‚¢ + //Žå‚ÉageAsage‘΍ô + if (Pos('@', URL) = 0) or (Pos('.', URL) = 0) then begin + Cancel := True; + end; end; end; @@ -4947,10 +4953,6 @@ begin if PreviewTimer.Enabled then PreviewTimer.Enabled := False; - if (FResPopupBrowser <> nil) and (IsWindowVisible(FResPopupBrowser.Handle)) then begin - FResPopupBrowser.Clear; - end; - if (FPreviewBrowser <> nil) and (IsWindowVisible(FPreviewBrowser.Handle)) then begin //‚±‚±‚ŏÁ‚³‚ê‚é‚Ì‚ª–â‘è