履歴関連のメッセージ修正、ヘルプにギコナビFAQを追加、新bbsmenuのURL変更に対応

diff --git a/Giko.dfm b/Giko.dfm
index ba3c755..a1094f6 100644 (file)
--- a/Giko.dfm
+++ b/Giko.dfm
@@ -9980,6 +9980,10 @@ object GikoForm: TGikoForm
       object H4: TMenuItem
         Action = GikoHelpAction
       end
+      object WikiFAQ: TMenuItem
+        Action = WikiFAQWebPageAction
+        Caption = #12462#12467#12490#12499'Wiki FAQ'
+      end
       object N36: TMenuItem
         Caption = '-'
       end
@@ -11203,6 +11207,11 @@ object GikoForm: TGikoForm
       Hint = #12473#12524#12483#12489#19968#35239#12398#36984#25246#12434#35299#38500#12377#12427
       OnExecute = UnSelectedListViewActionExecute
     end
+    object WikiFAQWebPageAction: TAction
+      Category = #12504#12523#12503
+      Caption = 'WikiFAQWebPageAction'
+      OnExecute = WikiFAQWebPageActionExecute
+    end
   end
   object BrowserPopupMenu: TPopupMenu
     Left = 68

diff --git a/Giko.pas b/Giko.pas
index 9821d0e..180660b 100644 (file)
--- a/Giko.pas
+++ b/Giko.pas
@@ -564,6 +564,8 @@ type
     SelectComboBoxSplitter: TImage;
     ToolButton1: TToolButton;
     N74: TMenuItem;
+    WikiFAQ: TMenuItem;
+    WikiFAQWebPageAction: TAction;
                                procedure FormCreate(Sender: TObject);
                procedure FormDestroy(Sender: TObject);
                procedure CabinetPanelHide(Sender: TObject);
@@ -888,6 +890,7 @@ type
          Shift: TShiftState);
     procedure FavoriteTreeViewEditing(Sender: TObject; Node: TTreeNode;
       var AllowEdit: Boolean);
+    procedure WikiFAQWebPageActionExecute(Sender: TObject);
        private
                { Private \90é\8c¾ }
                FSortIndex: Integer;
@@ -7096,7 +7099,7 @@ end;
 
 procedure TGikoForm.SelectTextClearActionExecute(Sender: TObject);
 const
-       DEL_MSG = '\8di\8d\9e\82Ý\97\9a\97ð\82ð\8dí\8f\9c\82µ\82Ü\82·\81B\82æ\82ë\82µ\82¢\82Å\82·\82©\81H';
+       DEL_MSG = '\8di\8d\9e\82Ý\91S\97\9a\97ð\82ð\8dí\8f\9c\82µ\82Ü\82·\81B\82æ\82ë\82µ\82¢\82Å\82·\82©\81H';
        DEL_TITLE = '\8dí\8f\9c\8am\94F';
 begin
        if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then
@@ -7112,7 +7115,7 @@ procedure TGikoForm.NameTextClearActionExecute(Sender: TObject);
 var
        i: Integer;
 const
-       DEL_MSG = '\83\8c\83X\83G\83f\83B\83^\96¼\91O\97\9a\97ð\82ð\8dí\8f\9c\82µ\82Ü\82·\81B\82æ\82ë\82µ\82¢\82Å\82·\82©\81H';
+       DEL_MSG = '\83\8c\83X\83G\83f\83B\83^\96¼\91O\91S\97\9a\97ð\82ð\8dí\8f\9c\82µ\82Ü\82·\81B\82æ\82ë\82µ\82¢\82Å\82·\82©\81H';
        DEL_TITLE = '\8dí\8f\9c\8am\94F';
 begin
        if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then
@@ -7129,7 +7132,7 @@ procedure TGikoForm.MailTextClearActionExecute(Sender: TObject);
 var
        i: Integer;
 const
-       DEL_MSG = '\83\8c\83X\83G\83f\83B\83^\83\81\81[\83\8b\97\9a\97ð\82ð\8dí\8f\9c\82µ\82Ü\82·\81B\82æ\82ë\82µ\82¢\82Å\82·\82©\81H';
+       DEL_MSG = '\83\8c\83X\83G\83f\83B\83^\83\81\81[\83\8b\91S\97\9a\97ð\82ð\8dí\8f\9c\82µ\82Ü\82·\81B\82æ\82ë\82µ\82¢\82Å\82·\82©\81H';
        DEL_TITLE = '\8dí\8f\9c\8am\94F';
 begin
        if (GetKeyState( VK_SHIFT ) and $80000000) = 0 then
@@ -8182,7 +8185,7 @@ end;
 
 procedure TGikoForm.ToolButton18Click(Sender: TObject);
 const
-       DEL_MSG = '\97\9a\97ð\82ð\8dí\8f\9c\82µ\82Ü\82·\81B\82æ\82ë\82µ\82¢\82Å\82·\82©\81H';
+       DEL_MSG = '\91S\97\9a\97ð\82ð\8dí\8f\9c\82µ\82Ü\82·\81B\82æ\82ë\82µ\82¢\82Å\82·\82©\81H';
        DEL_TITLE = '\8dí\8f\9c\8am\94F';
 begin
        if FTreeType = gttHistory then begin
@@ -12225,6 +12228,13 @@ begin
        MsgBox(Handle, s, '\8f\88\97\9d\82³\82ê\82È\82©\82Á\82½\97á\8aO', MB_OK or MB_ICONSTOP);
 end;
 
+procedure TGikoForm.WikiFAQWebPageActionExecute(Sender: TObject);
+const
+       URL_Wiki: string = 'http://gikowiki.dyndns.info/index.php?FAQ';
+begin
+       GikoSys.OpenBrowser(URL_Wiki, gbtAuto);
+end;
+
 initialization
                                OleInitialize(nil);
 finalization

diff --git a/Setting.pas b/Setting.pas
index 60f41bc..e79cff5 100644 (file)
--- a/Setting.pas
+++ b/Setting.pas
@@ -784,9 +784,8 @@ const
        DEFAULT_TAB_FONT_NAME: string            = '\82l\82r \82o\83S\83V\83b\83N';
        DEFAULT_TAB_FONT_SIZE: Integer          = 9;
        DEFAULT_2CH_BOARD_URL1: string = 'http://www6.ocn.ne.jp/~mirv/2chmenu.html';
-       DEFAULT_2CH_BOARD_URL2: string = 'http://www.ff.iij4u.or.jp/~ch2/bbsmenu.html';
-                                     //http://menu.2ch.net/bbsmenu.html //\82à\82¤\82·\82®\82±\82ê\82ª\90³\8e®\82È\94Â\88ê\97\97\82É\82È\82é\82æ\82¤
-                                                                                                                               //'http://www.2ch.net/newbbsmenu.html';
+       DEFAULT_2CH_BOARD_URL2: string = 'http://menu.2ch.net/bbsmenu.html';
+                                         //2005/10/1\82Éiij4u\82Ì\95û\82Í\8fÁ\96Å                                                                                                                          //'http://www.2ch.net/newbbsmenu.html';
        GIKO_ENCRYPT_TEXT: string                = 'gikoNaviEncryptText';
 
         DEF_MESSAGES : array[0..13] of string = (  '\83\8d\83O\83A\83E\83g\82µ\82Ü\82µ\82½',