OSDN Git Service
(root)
/
gikonavigoeson
/
gikonavi.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
コメントテスト2
[gikonavigoeson/gikonavi.git]
/
Giko.pas
diff --git
a/Giko.pas
b/Giko.pas
index
037d505
..
416e3e9
100644
(file)
--- 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;
KokoPopupMenu.Popup(p.x, p.y);
end else if Pos('mailto', LowerCase(URL)) <> 0 then begin
Cancel := not GikoSys.Setting.OpenMailer;
+
+ //@
\82
Æ.
\82
ð
\8a
Ü
\82
Ü
\82
È
\82
¢URL
\82
Í
\83
\81
\81
[
\83
\8b
\83
A
\83
h
\83
\8c
\83
X
\82
Æ
\82
Ý
\82
È
\82
³
\82
È
\82
¢
+ //
\8e
å
\82
Éage
\81
Asage
\91
Î
\8d
ô
+ if (Pos('@', URL) = 0) or (Pos('.', URL) = 0) then begin
+ Cancel := True;
+ end;
end;
end;
end;
end;
@@
-4947,10
+4953,6
@@
begin
if PreviewTimer.Enabled then
PreviewTimer.Enabled := False;
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
//
\82
±
\82
±
\82
Å
\8f
Á
\82
³
\82
ê
\82
é
\82
Ì
\82
ª
\96
â
\91
è
if (FPreviewBrowser <> nil)
and (IsWindowVisible(FPreviewBrowser.Handle)) then begin
//
\82
±
\82
±
\82
Å
\8f
Á
\82
³
\82
ê
\82
é
\82
Ì
\82
ª
\96
â
\91
è