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

📄 main.dfm

📁 实现RS232数据采集处理,设置RS23传输参数,显示控制终端的数据.
💻 DFM
📖 第 1 页 / 共 5 页
字号:
object FormMain: TFormMain
  Left = 16
  Top = 2
  Width = 1008
  Height = 736
  Caption = 'XXXX'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poDesktopCenter
  Visible = True
  OnCloseQuery = FormMainCloseQuery
  OnCreate = FormMainCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter5: TSplitter
    Left = 0
    Top = 137
    Width = 1000
    Height = 3
    Cursor = crVSplit
    Align = alTop
  end
  object Panel3: TPanel
    Left = 0
    Top = 140
    Width = 1000
    Height = 531
    Align = alClient
    TabOrder = 3
    object Splitter6: TSplitter
      Left = 225
      Top = 1
      Width = 3
      Height = 529
      Cursor = crHSplit
    end
    object Panel4: TPanel
      Left = 1
      Top = 1
      Width = 224
      Height = 529
      Align = alLeft
      TabOrder = 0
      object TreeView1: TTreeView
        Left = 1
        Top = 1
        Width = 222
        Height = 527
        Align = alClient
        Images = ImageList2
        Indent = 19
        PopupMenu = PopupMenu1
        ReadOnly = True
        RightClickSelect = True
        TabOrder = 0
        OnChanging = TreeView1Changing
        OnClick = TreeView1Click
        OnExpanding = TreeView1Expanding
        OnMouseDown = TreeView1MouseDown
      end
      object Memo3: TMemo
        Left = 16
        Top = 464
        Width = 185
        Height = 33
        ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
        Lines.Strings = (
          'Memo3')
        TabOrder = 1
        Visible = False
      end
    end
    object Panel5: TPanel
      Left = 228
      Top = 1
      Width = 771
      Height = 529
      Align = alClient
      TabOrder = 1
      object PageControl1: TPageControl
        Left = 1
        Top = 1
        Width = 769
        Height = 527
        ActivePage = TabSheet4
        Align = alClient
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object TabSheet2: TTabSheet
          Caption = '参数获取'
          ImageIndex = 1
          object ScrollBox4: TScrollBox
            Left = 0
            Top = 0
            Width = 761
            Height = 492
            Align = alClient
            TabOrder = 0
            object Splitter4: TSplitter
              Left = 376
              Top = 0
              Width = 3
              Height = 488
              Cursor = crHSplit
              Align = alRight
            end
            object ScrollBox8: TScrollBox
              Left = 0
              Top = 0
              Width = 376
              Height = 488
              Align = alClient
              TabOrder = 0
              object GroupBox5: TGroupBox
                Left = 8
                Top = 0
                Width = 369
                Height = 481
                Caption = '获取空调模拟量'
                TabOrder = 0
                object Edit7: TEdit
                  Left = 144
                  Top = 56
                  Width = 185
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 0
                end
                object Edit8: TEdit
                  Left = 144
                  Top = 96
                  Width = 185
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 1
                end
                object Edit9: TEdit
                  Left = 144
                  Top = 344
                  Width = 185
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 2
                end
                object Edit10: TEdit
                  Left = 144
                  Top = 304
                  Width = 185
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 3
                end
                object Edit11: TEdit
                  Left = 144
                  Top = 264
                  Width = 185
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 4
                end
                object Edit12: TEdit
                  Left = 144
                  Top = 224
                  Width = 185
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 5
                end
                object Edit13: TEdit
                  Left = 144
                  Top = 176
                  Width = 185
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 6
                end
                object Edit14: TEdit
                  Left = 144
                  Top = 136
                  Width = 185
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 7
                end
                object StaticText18: TStaticText
                  Left = 24
                  Top = 56
                  Width = 106
                  Height = 24
                  Caption = 'TH1  温度值:'
                  TabOrder = 8
                end
                object StaticText19: TStaticText
                  Left = 24
                  Top = 104
                  Width = 106
                  Height = 24
                  Caption = 'TH2  温度值:'
                  TabOrder = 9
                end
                object StaticText20: TStaticText
                  Left = 24
                  Top = 144
                  Width = 106
                  Height = 24
                  Caption = 'TH3  温度值:'
                  TabOrder = 10
                end
                object StaticText21: TStaticText
                  Left = 24
                  Top = 184
                  Width = 109
                  Height = 24
                  Caption = 'TH0A温度值:'
                  TabOrder = 11
                end
                object StaticText22: TStaticText
                  Left = 24
                  Top = 224
                  Width = 110
                  Height = 24
                  Caption = 'TH0D温度值:'
                  TabOrder = 12
                end
                object StaticText23: TStaticText
                  Left = 24
                  Top = 264
                  Width = 109
                  Height = 24
                  Caption = 'TH0E温度值:'
                  TabOrder = 13
                end
                object StaticText24: TStaticText
                  Left = 32
                  Top = 304
                  Width = 84
                  Height = 24
                  Caption = '马达步数:'
                  TabOrder = 14
                end
                object StaticText25: TStaticText
                  Left = 24
                  Top = 344
                  Width = 116
                  Height = 24
                  Caption = '当前工作温度:'
                  TabOrder = 15
                end
                object BitBtn24: TBitBtn
                  Left = 112
                  Top = 392
                  Width = 75
                  Height = 25
                  Caption = '获取'
                  TabOrder = 16
                  OnClick = BitBtn24Click
                end
                object BitBtn25: TBitBtn
                  Left = 216
                  Top = 392
                  Width = 75
                  Height = 25
                  Caption = '清除'
                  TabOrder = 17
                  OnClick = BitBtn25Click
                end
              end
            end
            object ScrollBox9: TScrollBox
              Left = 379
              Top = 0
              Width = 378
              Height = 488
              Align = alRight
              TabOrder = 1
              object GroupBox6: TGroupBox
                Left = 8
                Top = 0
                Width = 363
                Height = 481
                Caption = '获取空调开关量'
                TabOrder = 0
                object Edit15: TEdit
                  Left = 144
                  Top = 56
                  Width = 177
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 0
                end
                object Edit17: TEdit
                  Left = 144
                  Top = 280
                  Width = 177
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'
                  ParentFont = False
                  ReadOnly = True
                  TabOrder = 1
                end
                object Edit18: TEdit
                  Left = 144
                  Top = 112
                  Width = 177
                  Height = 24
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -16
                  Font.Name = '宋体'
                  Font.Style = []
                  ImeName = '点[开始程序]或Ctrl+Alt+W启动万能五笔'

⌨️ 快捷键说明

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