Blockly review

2025-06-11 01:33:52 +02:00
parent b8a530254d
commit 3cfca1f167
4 changed files with 248 additions and 242 deletions
@@ -30,7 +30,7 @@ object MainForm: TMainForm
        Size.PlatformDefault = False
        Text = 'Refresh'
        TextSettings.Trimming = None
-        OnClick = LauchSiteButtonClick
+        OnClick = RefreshButtonClick
      end
      object SaveWorkspaceButton: TSpeedButton
        Align = Left
@@ -52,6 +52,19 @@ object MainForm: TMainForm
        TextSettings.Trimming = None
        OnClick = GenerateCodeButtonClick
      end
+      object InputEdit: TEdit
+        Touch.InteractiveGestures = [LongTap, DoubleTap]
+        Align = Left
+        TabOrder = 3
+        Text = '1345'
+        Position.X = 240.000000000000000000
+        Position.Y = 10.000000000000000000
+        Margins.Top = 10.000000000000000000
+        Margins.Bottom = 10.000000000000000000
+        Size.Width = 73.000000000000000000
+        Size.Height = 20.000000000000000000
+        Size.PlatformDefault = False
+      end
    end
  end
  object Memo: TMemo