unit_querybirthday.dfm

delphi开发的中国移动大客户管理系统,后台数据库为oracle

inherited frm_QueryBirthday: Tfrm_QueryBirthday
  Left = 307
  Top = 194
  Width = 551
  Height = 369
  Caption = '大客户生日查询'
  PixelsPerInch = 96
  TextHeight = 14
  inherited Splitter1: TSplitter
    Height = 310
  end
  inherited Panel1: TPanel
    Height = 310
    inherited Panel5: TPanel
      Top = 271
    end
    inherited PageControl1: TPageControl
      Height = 270
      inherited TabSheet1: TTabSheet
        inherited Panel6: TPanel
          Height = 238
          inherited ScrollBox_GR: TScrollBox
            Height = 238
            inherited PanelGR_base1: TPanel
              Top = 466
              Height = 153
              object Label8: TLabel
                Left = 37
                Top = 50
                Width = 14
                Height = 14
                Caption = '至'
              end
              object Label9: TLabel
                Left = 37
                Top = 26
                Width = 14
                Height = 14
                Caption = '从'
              end
              object dtpGR_BirthdayBegin: TDateTimePicker
                Left = 78
                Top = 22
                Width = 140
                Height = 22
                CalAlignment = dtaLeft
                Date = 37466.6513419676
                Time = 37466.6513419676
                Color = clActiveBorder
                DateFormat = dfShort
                DateMode = dmComboBox
                Enabled = False
                ImeName = '中文 (简体) - 智能 ABC'
                Kind = dtkDate
                ParseInput = False
                TabOrder = 0
              end
              object dtpGR_BirthdayEnd: TDateTimePicker
                Left = 78
                Top = 48
                Width = 140
                Height = 22
                CalAlignment = dtaLeft
                Date = 37466.6513419676
                Time = 37466.6513419676
                Color = clActiveBorder
                DateFormat = dfShort
                DateMode = dmComboBox
                Enabled = False
                ImeName = '中文 (简体) - 智能 ABC'
                Kind = dtkDate
                ParseInput = False
                TabOrder = 1
              end
              object cbGR_Birthday: TFlatCheckBox
                Left = 8
                Top = 0
                Width = 145
                Height = 17
                Caption = '生日时间段'
                Font.Charset = GB2312_CHARSET
                Font.Color = clWindowText
                Font.Height = -15
                Font.Name = '宋体'
                Font.Style = []
                ParentFont = False
                TabOrder = 2
                TabStop = True
                OnClick = cbGR_BirthdayClick
              end
            end
            inherited PanelGR_base: TPanel
              Top = 312
            end
            inherited PanelGR_Stuff: TPanel
              Top = 388
            end
            inherited PanelGRBTN_highlevel: TPanel
              Top = 619
            end
            inherited PanelGR_highlevel2: TPanel
              Top = 833
            end
            inherited PanelGR_highlevel: TPanel
              Top = 935
            end
            inherited PanelGR_highlevel1: TPanel
              Top = 664
            end
            inherited PanelGR_SelectOrder: TPanel
              Top = 45
              inherited spiGR_Return: TFlatSpinEditInteger
                Increment = 100
                MaxValue = 999999
              end
            end
            inherited PanelGRBTN_SelectOrder: TPanel
              Top = 0
            end
          end
        end
      end
    end
  end
  inherited Panel2: TPanel
    Width = 302
    Height = 310
    inherited Panel3: TPanel
      Top = 271
      Width = 302
      inherited FlatButton2: TFlatButton
        Left = 466
        OnClick = FlatButton2Click
      end
      inherited FlatButton3: TFlatButton
        Left = 545
        OnClick = FlatButton3Click
      end
      inherited FlatButton4: TFlatButton
        Left = 622
      end
    end
    inherited dbgGR: TDBGrid
      Width = 302
      Height = 271
      Columns = <
        item
          Expanded = False
          FieldName = 'ROW_NUM'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '序号'
          Width = 43
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SID_C'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '手机号码'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NAME'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '客户姓名'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SR'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '出生年月'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DJDM_DESC'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '消费层次'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SXDM_DESC'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '客户属性'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'USER_ZJBS_DESC'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '品牌类型'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'STAT_DESC'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '手机状态'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CITYNO_DESC'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '地市'
          Width = 32
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'OFF_NO_HOME_DESC'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '局向'
          Width = 32
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'BE_DH_T'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '成为大客户'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'XB_DESC'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '性别'
          Width = 30
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'AGE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '年龄'
          Width = 31
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'GH_C'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '工号'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ADDR'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '联系地址'
          Width = 72
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'XYD'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '单停信用点'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SDATE'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = '开户时间'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VIP_NO_C'
          PickList.Strings = ()
          Title.Alignment = taCenter
          Title.Caption = 'VIP卡号'
          Width = 92
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'rln_name'
          PickList.Strings = ()
          Title.Caption = '联系人'
          Width = 62
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'lxdh'
          PickList.Strings = ()
          Title.Caption = '联系电话'
          Width = 62
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Zwsj'
          PickList.Strings = ()
          Title.Caption = '在网时长'
          Width = 62
          Visible = True
        end>
    end
    inherited lbGR_field: TListBox
      Items.Strings = (
        't.Sid_C'
        't.cityno_c'
        't.off_no_home_c'
        't.user_zjbs'
        't.djdm'
        't.sxdm'
        't.stat_c'
        't.sr_c')
    end
    inherited lbGR_fieldcomment: TListBox
      Items.Strings = (
        '手机号码'
        '地市'
        '局向'
        '品牌名称'
        '消费层次'
        '客户属性'
        '手机状态'
        '生日')
    end
  end
  inherited StatusBar1: TStatusBar
    Top = 310
    Width = 543
  end
  inherited browse_normal: TQuery
    SQL.Strings = (
      'SELECT * FROM T_v_gr_QUERYBIRTHDAY')
  end
end