例文を付け加えました

[json-checker/json_checker.git] / Unit1.dfm

diff --git a/Unit1.dfm b/Unit1.dfm
index f986f67..474f7bd 100644 (file)
--- a/Unit1.dfm
+++ b/Unit1.dfm
@@ -87,7 +87,7 @@ object Form1: TForm1
     object ToolButton11: TToolButton
       Left = 87
       Top = 0
-      Action = Redo
+      Action = Redo1
       Enabled = False
       ImageIndex = 1
     end
@@ -110,10 +110,8 @@ object Form1: TForm1
     object ToolButton5: TToolButton
       Left = 151
       Top = 0
-      Hint = 'Help'
-      Caption = 'ToolButton5'
+      Action = Hint1
       ImageIndex = 3
-      OnClick = ToolButton5Click
     end
     object ToolButton7: TToolButton
       Left = 174
@@ -158,8 +156,7 @@ object Form1: TForm1
     TabOrder = 4
     Tabs.Strings = (
       #12504#12523#12503
-      #12496#12540#12472#12519#12531#24773#22577
-      #12498#12531#12488)
+      #12496#12540#12472#12519#12531#24773#22577)
     TabIndex = 0
     Visible = False
     OnChange = TabControl1Change
@@ -197,6 +194,7 @@ object Form1: TForm1
         #12522#12489#12453#27231#33021#12434#36861#21152
         #12450#12531#12489#12453#12434#28145#12367#32368#12426#36820#12379#12427
         #22806#35251#12434#22793#26356
+        #12493#12473#12488#12375#12383#12392#12365#12398#12496#12464#12434#30452#12375#12414#12375#12383
         'TJSONArray '#12395#23550#24540#12375#12414#12375#12383' '
         ' --------------------'
         #21021#20844#38283)
@@ -204,23 +202,12 @@ object Form1: TForm1
       Visible = False
       WordWrap = False
     end
-    object Memo5: TMemo
-      Left = 600
-      Top = 24
-      Width = 185
-      Height = 89
-      Lines.Strings = (
-        'JSONObject'#12434#12493#12473#12488#12377#12427#38555#12395#12399#37197#21015#20869#12395#20837#12428#12390#12367#12384#12373#12356#12290)
-      TabOrder = 3
-      Visible = False
-      WordWrap = False
-    end
   end
   object ImageList1: TImageList
     Left = 200
     Top = 88
     Bitmap = {
-      494C010106000800A00010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010106000800A80010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       0000000000003600000028000000400000002000000001002000000000000020
       0000000000000000000000000000000000000000000000000000000000000000
       0000000000000000000000000000000000000000000000000000000000000000
@@ -548,12 +535,12 @@ object Form1: TForm1
       ShortCut = 16470
       OnExecute = Past1Execute
     end
-    object Redo: TAction
+    object Redo1: TAction
       Category = #32232#38598
       Caption = 'ReDo'
       Hint = 'Redo'
       ShortCut = 16466
-      OnExecute = RedoExecute
+      OnExecute = Redo1Execute
     end
   end
   object PopupMenu1: TPopupMenu
@@ -574,8 +561,8 @@ object Form1: TForm1
     object U1: TMenuItem
       Action = Undo1
     end
-    object ReDo1: TMenuItem
-      Action = Redo
+    object R1: TMenuItem
+      Action = Redo1
     end
   end
   object MainMenu1: TMainMenu
@@ -611,7 +598,7 @@ object Form1: TForm1
         Action = Undo1
       end
       object R2: TMenuItem
-        Action = Redo
+        Action = Redo1
       end
     end
     object N3: TMenuItem