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

📄 ufrmmeter.dfm

📁 水电管理系统,介绍了水电管理系统的基本结构和基本功能,对进行这方面的开发人员有一定帮助
💻 DFM
📖 第 1 页 / 共 2 页
字号:
object frmMeter: TfrmMeter
  Left = 204
  Top = 148
  Width = 736
  Height = 480
  Caption = 'frmMeter'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDesktopCenter
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 728
    Height = 169
    Align = alTop
    BevelInner = bvLowered
    TabOrder = 0
    object Label23: TLabel
      Left = 96
      Top = 30
      Width = 67
      Height = 13
      Caption = '编    号:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label15: TLabel
      Left = 96
      Top = 51
      Width = 67
      Height = 13
      Caption = '类    型:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label21: TLabel
      Left = 96
      Top = 71
      Width = 65
      Height = 13
      Caption = '附加数量:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 96
      Top = 92
      Width = 65
      Height = 13
      Caption = '所属车间:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 96
      Top = 112
      Width = 67
      Height = 13
      Caption = '倍    率:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 96
      Top = 133
      Width = 65
      Height = 13
      Caption = '执行单价:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 398
      Top = 30
      Width = 67
      Height = 13
      Caption = '型    号:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label16: TLabel
      Left = 398
      Top = 51
      Width = 65
      Height = 13
      Caption = '安装基数:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 398
      Top = 71
      Width = 65
      Height = 13
      AutoSize = False
      Caption = '最大计数:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label22: TLabel
      Left = 398
      Top = 92
      Width = 65
      Height = 13
      Caption = '所属班组:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 398
      Top = 112
      Width = 65
      Height = 13
      Caption = '费用定额:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 398
      Top = 133
      Width = 65
      Height = 13
      Caption = '安装位置:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 679
      Top = 112
      Width = 13
      Height = 13
      Caption = '元'
    end
    object DBLookupComboboxEh1: TDBLookupComboboxEh
      Left = 167
      Top = 130
      Width = 205
      Height = 19
      DataField = 'PriceID'
      DataSource = dsMeter
      DropDownBox.UseMultiTitle = True
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Flat = True
      ImeMode = imClose
      KeyField = 'PriceID'
      ListField = 'PriceName'
      ListSource = DataSource3
      ParentFont = False
      TabOrder = 0
      Visible = True
    end
    object DBEditEh9: TDBEditEh
      Left = 166
      Top = 109
      Width = 205
      Height = 19
      DataField = 'Multiple'
      DataSource = dsMeter
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Flat = True
      ImeName = '中文 (简体) - 王码五笔型86版'
      ParentFont = False
      TabOrder = 1
      Visible = True
    end
    object DBLookupComboboxEh2: TDBLookupComboboxEh
      Left = 166
      Top = 88
      Width = 205
      Height = 19
      DataField = 'WorkShopID'
      DataSource = dsMeter
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Flat = True
      ImeMode = imClose
      KeyField = 'WrokShopID'
      ListField = 'WrokShopName'
      ListSource = DataSource2
      ParentFont = False
      TabOrder = 2
      Visible = True
      OnCloseUp = DBLookupComboboxEh2CloseUp
    end
    object DBEditEh16: TDBEditEh
      Left = 166
      Top = 68
      Width = 205
      Height = 19
      DataField = 'SubjoinNumber'
      DataSource = dsMeter
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Flat = True
      ImeName = '中文 (简体) - 王码五笔型86版'
      ParentFont = False
      TabOrder = 3
      Visible = True
    end
    object DBLookupComboboxEh3: TDBLookupComboboxEh
      Left = 166
      Top = 48
      Width = 205
      Height = 19
      DataField = 'MeterSort'
      DataSource = dsMeter
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Flat = True
      ImeMode = imClose
      KeyField = 'MeterSortID'
      ListField = 'MeterSortName'
      ListSource = DataSource1
      ParentFont = False
      TabOrder = 4
      Visible = True
      OnCloseUp = DBLookupComboboxEh3CloseUp
    end
    object DBEditEh14: TDBEditEh
      Left = 166
      Top = 27
      Width = 205
      Height = 19
      DataField = 'MeterNO'
      DataSource = dsMeter
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Flat = True
      ImeName = '中文 (简体) - 王码五笔型86版'
      ParentFont = False
      TabOrder = 5
      Visible = True
    end
    object DBEditEh11: TDBEditEh
      Left = 472
      Top = 130
      Width = 204
      Height = 19
      DataField = 'FitPlace'
      DataSource = dsMeter
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Flat = True
      ImeName = '中文 (简体) - 王码五笔型86版'
      ParentFont = False
      TabOrder = 6
      Visible = True
    end
    object DBLookupComboboxEh6: TDBLookupComboboxEh
      Left = 471
      Top = 88
      Width = 205
      Height = 19
      DataField = 'SubWorkShopID'
      DataSource = dsMeter
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Flat = True
      ImeName = '中文 (简体) - 王码五笔型86版'
      KeyField = 'WrokShopID'
      ListField = 'WrokShopName'
      ListSource = DataSource4
      ParentFont = False
      TabOrder = 7
      Visible = True
    end
    object DBEditEh7: TDBEditEh
      Left = 471
      Top = 68
      Width = 205
      Height = 19
      DataField = 'MaxBound'
      DataSource = dsMeter
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Flat = True
      ImeName = '中文 (简体) - 王码五笔型86版'
      ParentFont = False
      TabOrder = 8
      Visible = True
    end
    object DBEditEh1: TDBEditEh
      Left = 471
      Top = 48
      Width = 205
      Height = 19
      DataField = 'BaseNumber'
      DataSource = dsMeter
      EditButtons = <>
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []

⌨️ 快捷键说明

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