⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 d_lmddesigner0.dfm

📁 delphi 运行期间窗体设计
💻 DFM
📖 第 1 页 / 共 3 页
字号:
          Width = 113
          Height = 17
          Caption = 'TEdit'
          TabOrder = 1
        end
        object RadioButton3: TRadioButton
          Left = 35
          Top = 68
          Width = 113
          Height = 17
          Caption = 'TLabel'
          TabOrder = 2
        end
        object RadioButton4: TRadioButton
          Left = 283
          Top = 20
          Width = 113
          Height = 17
          Caption = 'TMyPanel (custom)'
          TabOrder = 3
        end
        object RadioButton5: TRadioButton
          Left = 283
          Top = 44
          Width = 113
          Height = 17
          Caption = 'TTimer'
          TabOrder = 4
        end
        object RadioButton6: TRadioButton
          Left = 283
          Top = 68
          Width = 113
          Height = 17
          Caption = 'TPopupMenu'
          TabOrder = 5
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'Hints'
      ImageIndex = 2
      object Label10: TLabel
        Left = 6
        Top = 132
        Width = 475
        Height = 85
        AutoSize = False
        Caption = 
          'When you insert new, move, resize or move mouse over components ' +
          'designer shows hint windows like the Delphi designer does. You c' +
          'an disable some kind of hints and provide custom component hint ' +
          'messages. To try custom component hints check "Custom component ' +
          'hint" and place mouse cursor over any component on the Form2. Yo' +
          'u will see custom component hint message. See also sourcecode of' +
          ' OnComponentHint event handler.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
      object GroupBox3: TGroupBox
        Left = 8
        Top = 8
        Width = 473
        Height = 113
        Caption = 'Hints'
        TabOrder = 0
        object CheckBox3: TCheckBox
          Left = 48
          Top = 16
          Width = 97
          Height = 17
          Caption = 'Component'
          Checked = True
          State = cbChecked
          TabOrder = 0
          OnClick = CheckBox3Click
        end
        object CheckBox4: TCheckBox
          Left = 48
          Top = 36
          Width = 97
          Height = 17
          Caption = 'Size'
          Checked = True
          State = cbChecked
          TabOrder = 1
          OnClick = CheckBox4Click
        end
        object CheckBox5: TCheckBox
          Left = 168
          Top = 16
          Width = 97
          Height = 17
          Caption = 'Move'
          Checked = True
          State = cbChecked
          TabOrder = 2
          OnClick = CheckBox5Click
        end
        object CheckBox6: TCheckBox
          Left = 168
          Top = 36
          Width = 97
          Height = 17
          Caption = 'Insert'
          Checked = True
          State = cbChecked
          TabOrder = 3
          OnClick = CheckBox6Click
        end
        object CheckBox7: TCheckBox
          Left = 48
          Top = 57
          Width = 153
          Height = 17
          Caption = 'Custom component hint'
          TabOrder = 4
          OnClick = CheckBox7Click
        end
        object Edit1: TEdit
          Left = 64
          Top = 77
          Width = 153
          Height = 21
          Enabled = False
          TabOrder = 5
          Text = 'Some text: %s'
        end
      end
    end
    object TabSheet4: TTabSheet
      Caption = 'Save/Load'
      ImageIndex = 3
      object Label11: TLabel
        Left = 6
        Top = 132
        Width = 475
        Height = 85
        AutoSize = False
        Caption = 
          'Designer supports saving and loading of designed forms/controls.' +
          ' File format is compatible with Delphi *.dfm file format (text a' +
          'nd binary formats supported). Please note that designer saves co' +
          'mplete design control, not only its components. See also SaveToF' +
          'ile, LoadFromFile, SaveToStream and LoadFromStream designer meth' +
          'ods.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
      object GroupBox5: TGroupBox
        Left = 8
        Top = 8
        Width = 473
        Height = 113
        Caption = 'Designing form saving and loading'
        TabOrder = 0
        object Button6: TButton
          Left = 16
          Top = 32
          Width = 129
          Height = 25
          Caption = 'Save form'
          TabOrder = 0
          OnClick = Button6Click
        end
        object Button7: TButton
          Left = 152
          Top = 32
          Width = 129
          Height = 25
          Caption = 'Open form'
          TabOrder = 1
          OnClick = Button7Click
        end
      end
    end
    object TabSheet5: TTabSheet
      Caption = 'Drag && Drop'
      ImageIndex = 4
      object Label12: TLabel
        Left = 6
        Top = 132
        Width = 475
        Height = 85
        AutoSize = False
        Caption = 
          'Try to drag "Drag me on the designing form" panel to see drag an' +
          'd drop operations support. Check event trace while dragging the ' +
          'panel. See also sourcecode of OnDragDrop, OnDragOver event handl' +
          'ers (Designer control).'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
      object GroupBox7: TGroupBox
        Left = 8
        Top = 8
        Width = 473
        Height = 113
        Caption = 'Drag && Drop support'
        TabOrder = 0
        object Panel1: TPanel
          Left = 24
          Top = 32
          Width = 433
          Height = 49
          Caption = 'Drag me on the designing form'
          DragMode = dmAutomatic
          TabOrder = 0
        end
      end
    end
    object TabSheet6: TTabSheet
      Caption = 'Clipboard operations'
      ImageIndex = 5
      object Label5: TLabel
        Left = 6
        Top = 24
        Width = 475
        Height = 153
        AutoSize = False
        Caption = 
          'Use right mousebutton or a special keyboard key to activate popu' +
          'p menu on Form2. Now execute any Cut, Copy or Paste clipboard op' +
          'erations. You can also use standard hot keys (Ctrl+X, Ctrl+C, Ct' +
          'rl+V). Designer supports copying/pasting of multiple components ' +
          'and preserves references between them. '#13#10#13#10'Example:'#13#10'Active desi' +
          'gner and select Button and associated UpDown control. Then copy ' +
          'and paste components. Deactivate designer and try to use origina' +
          'l and pasted UpDown controls. You will see that Original UpDown ' +
          'control works with original Button, the pasted UpDown control wi' +
          'th the pasted Button. To learn more about clipbord format see de' +
          'signer ClipboardFormat property documentation.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
    end
    object TabSheet7: TTabSheet
      Caption = 'Hidden classes'
      ImageIndex = 6
      object Label13: TLabel
        Left = 6
        Top = 132
        Width = 475
        Height = 85
        AutoSize = False
        Caption = 
          'It is probably not desired that all nonvisual component are show' +
          'n on the designing form. For example, menu item components of po' +
          'pup menus may not be shown. Designer provides HiddenClasses prop' +
          'erty which can be used to specify component classes which should' +
          ' be hidden. You can also use OnShowNonvisualComponent event to d' +
          'etermine visible state of each nonvisual component individually.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
      object GroupBox6: TGroupBox
        Left = 8
        Top = 8
        Width = 473
        Height = 113
        Caption = 'Hidden classes'
        TabOrder = 0
        object CheckBox12: TCheckBox
          Left = 24
          Top = 32
          Width = 97
          Height = 17
          Caption = 'TMenuItem'
          Checked = True
          State = cbChecked
          TabOrder = 0
          OnClick = CheckBox12Click
        end
        object CheckBox13: TCheckBox
          Left = 24
          Top = 56

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -