cjuserlistfm.dfm

一个电力部门的催缴费用系统

inherited FM_CjUserList: TFM_CjUserList
  Left = 61
  Top = 132
  Width = 745
  Height = 535
  Caption = '催缴用户管理'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  inherited Splitter1: TSplitter
    Top = 185
    Width = 737
  end
  inherited Dock971: TDock97
    Width = 737
    inherited tbar97_Self: TToolbar97
      inherited tbtn97_Const_Edit: TToolbarButton97
        Left = 60
        Width = 60
        Caption = '编辑'
      end
      inherited tbtn97_Const_New: TToolbarButton97
        Width = 60
        Caption = '新增'
      end
      inherited tbtn97_Const_Cancel: TToolbarButton97
        Left = 120
        Width = 60
        Caption = '取消'
      end
      inherited tbtn97_Const_Delete: TToolbarButton97
        Left = 240
        Width = 60
        Caption = '删除'
      end
      inherited tbtn97_Const_Save: TToolbarButton97
        Left = 180
        Width = 60
        Caption = '保存'
      end
      inherited ToolbarSep971: TToolbarSep97
        Left = 426
      end
      inherited tbtn97_Const_Quit: TToolbarButton97
        Left = 432
        Width = 59
        Caption = '退出'
      end
      object ToolbarButton971: TToolbarButton97
        Left = 306
        Top = 0
        Width = 60
        Height = 22
        Action = actn_Const_Find
        Images = il_MainEn
      end
      object ToolbarSep972: TToolbarSep97
        Left = 300
        Top = 0
      end
      object ToolbarButton972: TToolbarButton97
        Left = 366
        Top = 0
        Width = 60
        Height = 22
        Action = actn_Const_Print
        Images = il_MainEn
        Visible = False
      end
    end
  end
  inherited sbx_Top: TScrollBox
    Width = 737
    Height = 159
    inherited pnl_Top: TPanel
      Width = 733
      Height = 681
      Align = alTop
      inherited pnl_TopChild: TPanel
        Height = 667
        Caption = ''
        object Label1: TLabel
          Left = 14
          Top = 35
          Width = 48
          Height = 12
          Caption = '帐    号'
        end
        object Label2: TLabel
          Left = 13
          Top = 67
          Width = 48
          Height = 12
          Caption = '电话号码'
        end
        object Label3: TLabel
          Left = 13
          Top = 101
          Width = 48
          Height = 12
          Caption = '用户名称'
          Visible = False
        end
        object Label4: TLabel
          Left = 312
          Top = 36
          Width = 48
          Height = 12
          Caption = '用户区域'
        end
        object Label5: TLabel
          Left = 312
          Top = 68
          Width = 48
          Height = 12
          Caption = '用户类型'
        end
        object DBEdit1: TDBEdit
          Left = 77
          Top = 31
          Width = 225
          Height = 20
          DataField = 'CZH'
          DataSource = DM_CommonData.Ds_CjUserList
          ImeName = '中文 (简体) - 微软拼音'
          TabOrder = 2
        end
        object DBEdit2: TDBEdit
          Left = 77
          Top = 63
          Width = 225
          Height = 20
          DataField = 'PhoneCode'
          DataSource = DM_CommonData.Ds_CjUserList
          ImeName = '中文 (简体) - 微软拼音'
          TabOrder = 1
        end
        object DBEdit3: TDBEdit
          Left = 77
          Top = 96
          Width = 225
          Height = 20
          DataField = 'UserName'
          DataSource = DM_CommonData.Ds_CjUserList
          ImeName = '中文 (简体) - 微软拼音'
          TabOrder = 0
          Visible = False
        end
        object DBLookupComboBox2: TDBLookupComboBox
          Left = 370
          Top = 63
          Width = 145
          Height = 20
          DataField = 'User_Type'
          DataSource = DM_CommonData.Ds_CjUserList
          ImeName = '中文 (简体) - 微软拼音'
          KeyField = 'ID'
          ListField = 'Note'
          ListSource = DM_CommonData.Ds_UserType
          TabOrder = 3
        end
        object ComboBox1: TComboBox
          Left = 370
          Top = 32
          Width = 145
          Height = 20
          ItemHeight = 12
          TabOrder = 4
        end
        object DBLookupComboBox1: TDBLookupComboBox
          Left = 448
          Top = 112
          Width = 145
          Height = 20
          TabOrder = 5
        end
      end
    end
  end
  inherited Sta_Main: TStatusBar
    Top = 489
    Width = 737
  end
  inherited rxdbg_Main: TRxDBGrid
    Top = 188
    Width = 737
    Height = 301
    DataSource = DM_CommonData.Ds_CjUserList
    ReadOnly = True
    Columns = <
      item
        Expanded = False
        FieldName = 'CZH'
        PickList.Strings = ()
        Title.Alignment = taCenter
        Title.Caption = '帐号'