生キー指定で、19桁以上が拡張領域なのに、11桁以上になっていた不具合の修正

[gikonavigoeson/gikonavi.git] / Giko.dfm

diff --git a/Giko.dfm b/Giko.dfm
index ac13f76..1a211f2 100644 (file)
--- a/Giko.dfm
+++ b/Giko.dfm
@@ -1,6 +1,6 @@
 object GikoForm: TGikoForm
-  Left = 422
-  Top = 68
+  Left = 241
+  Top = 116
   HorzScrollBar.Visible = False
   VertScrollBar.Visible = False
   AutoScroll = False
@@ -346,7 +346,7 @@ object GikoForm: TGikoForm
               end>
             EdgeBorders = [ebLeft, ebTop, ebRight]
             EdgeInner = esLowered
-            PopupMenu = MainCoolBarPopupMenu
+            OnContextPopup = MainCoolBarContextPopup
             OnBandInfo = ListCoolBarBandInfo
             OnChevronClick = ListCoolBarChevronClick
             object ListToolBar: TToolBar
@@ -367,15 +367,8 @@ object GikoForm: TGikoForm
               Transparent = True
               Wrapable = False
               OnResize = ListToolBarResize
-              object ToolButton1: TToolButton
-                Left = 0
-                Top = 0
-                Width = 8
-                Caption = 'ToolButton1'
-                Style = tbsSeparator
-              end
               object SelectComboBoxPanel: TPanel
-                Left = 8
+                Left = 0
                 Top = 0
                 Width = 200
                 Height = 22
@@ -555,7 +548,7 @@ object GikoForm: TGikoForm
               item
                 Control = BrowserToolBar
                 ImageIndex = -1
-                MinHeight = 0
+                MinHeight = 18
                 Width = 421
               end
               item
@@ -573,14 +566,14 @@ object GikoForm: TGikoForm
               end>
             EdgeBorders = [ebLeft, ebTop, ebRight]
             EdgeInner = esLowered
-            PopupMenu = MainCoolBarPopupMenu
+            OnContextPopup = MainCoolBarContextPopup
             OnBandInfo = BrowserCoolBarBandInfo
             OnChevronClick = BrowserCoolBarChevronClick
             object BrowserToolBar: TToolBar
               Left = 9
               Top = 0
               Width = 408
-              Height = 0
+              Height = 18
               AutoSize = True
               ButtonWidth = 24
               Caption = #12502#12521#12454#12470#12484#12540#12523#12496#12540
@@ -594,46 +587,6 @@ object GikoForm: TGikoForm
               Transparent = True
               Wrapable = False
               OnResize = BrowserToolBarResize
-              object ToolButton3: TToolButton
-                Left = 0
-                Top = 0
-                Width = 8
-                Style = tbsSeparator
-              end
-              object ToolButton9: TToolButton
-                Left = 8
-                Top = 0
-                Width = 8
-                Style = tbsSeparator
-              end
-              object ToolButton16: TToolButton
-                Left = 16
-                Top = 0
-                Width = 8
-                Caption = 'ToolButton16'
-                ImageIndex = 13
-                Style = tbsSeparator
-              end
-              object ToolButton11: TToolButton
-                Left = 24
-                Top = 0
-                Width = 8
-                Style = tbsSeparator
-              end
-              object ToolButton5: TToolButton
-                Left = 32
-                Top = 0
-                Width = 8
-                Style = tbsSeparator
-              end
-              object ToolButton20: TToolButton
-                Left = 40
-                Top = 0
-                Width = 8
-                Caption = 'ToolButton20'
-                ImageIndex = 29
-                Style = tbsSeparator
-              end
             end
             object BrowserNameToolBar: TToolBar
               Left = 432
@@ -910,7 +863,7 @@ object GikoForm: TGikoForm
             Text = #12522#12531#12463
             Width = 735
           end>
-        PopupMenu = MainCoolBarPopupMenu
+        OnContextPopup = MainCoolBarContextPopup
         OnResize = MainCoolBarResize
         OnBandInfo = MainCoolBarBandInfo
         OnChevronClick = MainCoolBarChevronClick
@@ -4478,7 +4431,10 @@ object GikoForm: TGikoForm
       object B4: TMenuItem
         Action = GikoDM.NewBoardAction
       end
-      object N7: TMenuItem
+      object N80: TMenuItem
+        Action = GikoDM.NewBoardSearchAction
+      end
+      object N84: TMenuItem
         Caption = '-'
       end
       object DeleteMenu: TMenuItem
@@ -4520,6 +4476,12 @@ object GikoForm: TGikoForm
       object N61: TMenuItem
         Caption = '-'
       end
+      object N77: TMenuItem
+        Action = GikoDM.StoredTaskTrayAction
+      end
+      object N78: TMenuItem
+        Caption = '-'
+      end
       object ExitMenu: TMenuItem
         Action = GikoDM.ExitAction
       end
@@ -4960,6 +4922,9 @@ object GikoForm: TGikoForm
       object T7: TMenuItem
         Action = GikoDM.ToolBarSettingAction
       end
+      object N86: TMenuItem
+        Action = GikoDM.PopupMenuSettingAction
+      end
       object N40: TMenuItem
         Caption = '-'
       end
@@ -5023,6 +4988,12 @@ object GikoForm: TGikoForm
       object N38: TMenuItem
         Caption = '-'
       end
+      object UpdateGikonaviAction1: TMenuItem
+        Action = GikoDM.UpdateGikonaviAction
+      end
+      object N7: TMenuItem
+        Caption = '-'
+      end
       object AboutMenu: TMenuItem
         Action = GikoDM.AboutAction
       end
@@ -5138,7 +5109,7 @@ object GikoForm: TGikoForm
     object UrlCopyPMenu: TMenuItem
       Action = GikoDM.SelectItemURLCopyAction
     end
-    object C2: TMenuItem
+    object NameCopyPMenu: TMenuItem
       Action = GikoDM.SelectItemNameCopyAction
     end
     object NameUrlCopyPMenu: TMenuItem
@@ -5156,6 +5127,18 @@ object GikoForm: TGikoForm
     object LPMSep06: TMenuItem
       Caption = '-'
     end
+    object SaveThreadFile: TMenuItem
+      Caption = #36984#25246#12473#12524#12483#12489#12434#20445#23384#12377#12427
+      object HTML1: TMenuItem
+        Action = GikoDM.SelectItemSaveForHTML
+      end
+      object DAT4: TMenuItem
+        Action = GikoDM.SelectItemSaveForDat
+      end
+    end
+    object N79: TMenuItem
+      Caption = '-'
+    end
     object ViewPMenu: TMenuItem
       Caption = #34920#31034'(&V)'
       object LargeIconLPMenu: TMenuItem
@@ -5226,6 +5209,15 @@ object GikoForm: TGikoForm
       object N71: TMenuItem
         Action = GikoDM.IndividualAbonID0Action
       end
+      object N82: TMenuItem
+        Caption = '-'
+      end
+      object IDNG1: TMenuItem
+        Action = GikoDM.AddIDtoNGWord1Action
+      end
+      object IDNG2: TMenuItem
+        Action = GikoDM.AddIDtoNGWord0Action
+      end
     end
     object N52: TMenuItem
       Caption = #20491#21029#12354#12412#65374#12435#35299#38500
@@ -5242,6 +5234,21 @@ object GikoForm: TGikoForm
     object ID1: TMenuItem
       Action = GikoDM.SameIDResAnchorAction
     end
+    object N83: TMenuItem
+      Action = GikoDM.DereferenceResAction
+    end
+    object N85: TMenuItem
+      Caption = '-'
+    end
+    object URL2: TMenuItem
+      Caption = #12371#12398#12524#12473#12398'URL'
+      object URLPATHINFO1: TMenuItem
+        Action = GikoDM.konoURLPATHAction
+      end
+      object URLQUERYSTRING1: TMenuItem
+        Action = GikoDM.konoURLQueryAction
+      end
+    end
   end
   object BrowserTabPopupMenu: TPopupMenu
     Images = HotToobarImageList
@@ -5263,6 +5270,13 @@ object GikoForm: TGikoForm
     object N37: TMenuItem
       Caption = '-'
     end
+    object SameBoardThreadItem: TMenuItem
+      Caption = #21516#26495#12391#34920#31034#12375#12390#12356#12427#12473#12524#12483#12489
+      Hint = #21516#26495#12391#34920#31034#12375#12390#12427#12473#12524#12483#12489
+    end
+    object N81: TMenuItem
+      Caption = '-'
+    end
     object Close1: TMenuItem
       Action = GikoDM.BrowserTabCloseAction
     end
@@ -5376,7 +5390,6 @@ object GikoForm: TGikoForm
     end
   end
   object MainCoolBarPopupMenu: TPopupMenu
-    OnPopup = MainCoolBarPopupMenuPopup
     Left = 100
     Top = 404
     object StdToolBarVisiblePMenu: TMenuItem
@@ -5582,4 +5595,18 @@ object GikoForm: TGikoForm
     Left = 4
     Top = 373
   end
+  object ResPopupClearTimer: TTimer
+    Tag = 1
+    Enabled = False
+    OnTimer = ResPopupClearTimerTimer
+    Left = 8
+    Top = 440
+  end
+  object TaskTrayPopupMenu: TPopupMenu
+    Left = 38
+    Top = 373
+    object Exit1: TMenuItem
+      Action = GikoDM.ExitAction
+    end
+  end
 end