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

📄 grouprateform.dfm

📁 ***智能监视系统*** 程序运行时需要视频捕捉设备
💻 DFM
📖 第 1 页 / 共 2 页
字号:
            MinValue = 0
            TabOrder = 15
            Value = 0
          end
        end
      end
      object tstGroupRate: TTabSheet
        Caption = '分组'
        ImageIndex = 1
        object Panel3: TPanel
          Left = 0
          Top = 0
          Width = 480
          Height = 33
          Align = alTop
          Caption = 'Panel3'
          TabOrder = 0
          Visible = False
          object DBNavigator1: TDBNavigator
            Left = 1
            Top = 1
            Width = 376
            Height = 31
            DataSource = dsParkGroup
            Align = alLeft
            TabOrder = 0
          end
        end
        object Panel4: TPanel
          Left = 0
          Top = 33
          Width = 480
          Height = 266
          Align = alClient
          Caption = 'Panel4'
          TabOrder = 1
          object DBGrid1: TDBGrid
            Left = 1
            Top = 1
            Width = 478
            Height = 264
            Align = alLeft
            DataSource = dsParkGroup
            ReadOnly = True
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            Columns = <
              item
                Expanded = False
                FieldName = 'park_group_id'
                Title.Caption = '编号'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'group_name'
                Title.Caption = '名称'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'lotter'
                Title.Caption = '车位数'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'group_description'
                Title.Caption = '描述'
                Visible = True
              end>
          end
        end
      end
      object tstFeeRate: TTabSheet
        Caption = '费率'
        ImageIndex = 2
        object Panel5: TPanel
          Left = 0
          Top = 0
          Width = 480
          Height = 57
          Align = alTop
          TabOrder = 0
          object Label17: TLabel
            Left = 8
            Top = 16
            Width = 66
            Height = 13
            Caption = '请选择分组:'
          end
          object cbxParkGroup: TComboBox
            Left = 88
            Top = 13
            Width = 145
            Height = 21
            Style = csDropDownList
            ItemHeight = 13
            TabOrder = 0
            OnChange = cbxParkGroupChange
          end
        end
        object Panel6: TPanel
          Left = 0
          Top = 57
          Width = 480
          Height = 242
          Align = alClient
          Caption = 'Panel6'
          TabOrder = 1
          object dgdParkGroup: TDBGrid
            Left = 1
            Top = 1
            Width = 478
            Height = 240
            Align = alClient
            DataSource = dsFeeRate
            ReadOnly = True
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            Columns = <
              item
                Expanded = False
                FieldName = 'group_id'
                Title.Caption = '编号'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'week_no'
                Title.Caption = '星期'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'start_hour1'
                Title.Caption = '开始小时'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'start_min1'
                Title.Caption = '开始分钟'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'end_hour1'
                Title.Caption = '结束小时'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'end_min1'
                Title.Caption = '结束分钟'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'fee_rate1'
                Title.Caption = '时段1费率'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'start_hour2'
                Title.Caption = '开始小时'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'start_min2'
                Title.Caption = '开始分钟'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'end_hour2'
                Title.Caption = '结束小时'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'end_min2'
                Title.Caption = '结束分钟'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'fee_rate2'
                Title.Caption = '时段2费率'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'start_hour3'
                Title.Caption = '开始小时'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'start_min3'
                Title.Caption = '开始分钟'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'end_hour3'
                Title.Caption = '结束小时'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'end_min3'
                Title.Caption = '结束分钟'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'fee_rate3'
                Title.Caption = '时段3费率'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'start_hour4'
                Title.Caption = '开始小时'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'start_min4'
                Title.Caption = '开始分钟'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'end_hour4'
                Title.Caption = '结束小时'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'end_min4'
                Title.Caption = '结束分钟'
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'fee_rate4'
                Title.Caption = '时段4费率'
                Visible = True
              end>
          end
        end
      end
    end
  end
  inherited bbnOk: TBitBtn
    Left = 328
    Top = 336
  end
  inherited bbnCancel: TBitBtn
    Left = 408
    Top = 336
  end
  object dsParkGroup: TDataSource
    DataSet = tblParkGroup
    Left = 165
    Top = 153
  end
  object tblParkGroup: TADOTable
    BeforeDelete = tblParkGroupBeforeDelete
    Left = 184
    Top = 112
  end
  object tblFeeRate: TADOTable
    Left = 317
    Top = 162
  end
  object dsFeeRate: TDataSource
    DataSet = tblFeeRate
    Left = 317
    Top = 130
  end
  object tblTimePhase: TADOTable
    Left = 101
    Top = 121
  end
end

⌨️ 快捷键说明

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