TabOrder = 0
        object FlatButton2: TFlatButton
          Left = 152
          Top = 5
          Width = 75
          Height = 25
          Caption = '打印[&P]'
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
            888F8800000000000888808888888880808800000000000008080888888BBB88
            0008088888877788080800000000000008800888888888808080800000000008
            0800880FFFFFFFF080808880F00000F000088880FFFFFFFF088888880F00000F
            088888880FFFFFFFF08888888000000000888888888888888888}
          Layout = blGlyphLeft
          TabOrder = 0
          OnClick = FlatButton2Click
        end
        object FlatButton3: TFlatButton
          Left = 230
          Top = 5
          Width = 75
          Height = 25
          Caption = '導(dǎo)出[&O]'
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
            333333333333337FF3333333333333903333333333333377FF33333333333399
            03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
            99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
            99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
            03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
            33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
            33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
            3333777777333333333333333333333333333333333333333333}
          Layout = blGlyphLeft
          NumGlyphs = 2
          TabOrder = 1
          OnClick = FlatButton3Click
        end
        object FlatButton4: TFlatButton
          Left = 308
          Top = 5
          Width = 75
          Height = 25
          Caption = '關(guān)閉[&E]'
          Glyph.Data = {
            DE010000424DDE01000000000000760000002800000024000000120000000100
            0400000000006801000000000000000000001000000010000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
            F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
            000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
            338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
            45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
            3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
            F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
            000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
            338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
            4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
            8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
            333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
            0000}
          Layout = blGlyphLeft
          NumGlyphs = 2
          TabOrder = 2
          OnClick = FlatButton4Click
        end
      end
    end
    object dbgGR: TDBGrid
      Left = 0
      Top = 0
      Width = 432
      Height = 388
      Align = alClient
      DataSource = DataSource1
      ImeName = '中文 (簡體) - 微軟拼音'
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 1
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -14
      TitleFont.Name = '宋體'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'SID'
          Title.Alignment = taCenter
          Title.Caption = '手機號碼'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ACT_USER'
          Title.Alignment = taCenter
          Title.Caption = '實際使用者'
          Width = 85
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'procedurename'
          Title.Alignment = taCenter
          Title.Caption = '品牌名稱'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DESCRIPTION'
          Title.Alignment = taCenter
          Title.Caption = '消費層次'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'sxdmname'
          Title.Alignment = taCenter
          Title.Caption = '客戶屬性'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'starname'
          Title.Alignment = taCenter
          Title.Caption = '手機狀態(tài)'
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ACCOUNT_ID'
          Title.Alignment = taCenter
          Title.Caption = '帳號'
          Width = 117
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ACT_FEE'
          Title.Alignment = taCenter
          Title.Caption = '帳戶余額'
          Width = 75
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NAME'
          Title.Alignment = taCenter
          Title.Caption = '客戶經(jīng)理'
          Width = 78
          Visible = True
        end>
    end
  end
  object DataSource1: TDataSource
    DataSet = browse_normal
    Left = 368
    Top = 88
  end
  object browse_normal: TQuery
    DatabaseName = 'db_vipdl'
    SQL.Strings = (
      'select b.sid,b.cityno,b.off_no_home,d.home_name,b.gh,b.DJDM,'
      '  b.USER_ZJBS,e.description,'
      '  b.SXDM,b.ACT_USER,c.cityname,'
      ' b.STAT,h.name,'
      ' b.account_id,'
      ' i.act_fee'
      ' from t_f_custinfo b,'
      ' t_d_city c,t_d_county d,'
      ' t_d_grade e, '
      ' T_F_MANAGER h,'
      ' T_Q_ACTFEE i '
      ' where b.viph>0 and b.account_id is not null '
      ' and b.cityno=c.cityno(+)'
      '  and b.cityno=d.cityno(+) and b.off_no_home=d.off_no_home(+)'
      ' and b.DJDM=e.gradeno(+) '
      ' and b.gh=h.wk_no(+)'
      ' and b.sid=i.sid(+)')
    Left = 289
    Top = 88
    object browse_normalOFF_NO_HOME: TFloatField
      FieldName = 'OFF_NO_HOME'
    end
    object browse_normalHOME_NAME: TStringField
      FieldName = 'HOME_NAME'
      Size = 10
    end
    object browse_normalGH: TStringField
      FieldName = 'GH'
      Size = 12
    end
    object browse_normalSID: TStringField
      FieldName = 'SID'
      Size = 15
    end
    object browse_normalDJDM: TFloatField
      FieldName = 'DJDM'
    end
    object browse_normalDESCRIPTION: TStringField
      FieldName = 'DESCRIPTION'
    end
    object browse_normalSXDM: TFloatField
      FieldName = 'SXDM'
    end
    object browse_normalACT_USER: TStringField
      FieldName = 'ACT_USER'
      Size = 120
    end
    object browse_normalCITYNAME: TStringField
      FieldName = 'CITYNAME'
    end
    object browse_normalSTAT: TFloatField
      FieldName = 'STAT'
    end
    object browse_normalNAME: TStringField
      FieldName = 'NAME'
    end
    object browse_normalACCOUNT_ID: TStringField
      FieldName = 'ACCOUNT_ID'
      Size = 30
    end
    object browse_normalACT_FEE: TFloatField
      FieldName = 'ACT_FEE'
    end
    object browse_normalstarname: TStringField
      FieldKind = fkLookup
      FieldName = 'starname'
      LookupDataSet = Query2
      LookupKeyFields = 'PAR_VALUES'
      LookupResultField = 'PAR_DESC'
      KeyFields = 'STAT'
      Lookup = True
    end
    object browse_normalsxdmname: TStringField
      FieldKind = fkLookup
      FieldName = 'sxdmname'
      LookupDataSet = Query3
      LookupKeyFields = 'PAR_VALUES'
      LookupResultField = 'PAR_DESC'
      KeyFields = 'SXDM'
      Lookup = True
    end
    object browse_normalCITYNO: TStringField
      FieldName = 'CITYNO'
      Size = 3
    end
    object browse_normalUSER_ZJBS: TStringField
      FieldName = 'USER_ZJBS'
      Size = 1
    end
    object browse_normalprocedurename: TStringField
      FieldKind = fkLookup
      FieldName = 'procedurename'
      LookupDataSet = Query1
      LookupKeyFields = 'PAR_VALUES'
      LookupResultField = 'PAR_DESC'
      KeyFields = 'USER_ZJBS'
      Lookup = True
    end
  end
  object Query2: TQuery
    DatabaseName = 'db_vipdl'
    SQL.Strings = (
      'select * from t_d_config where '
      ' Upper(PAR_NAME)='#39'CUSTSTATUS'#39)
    Left = 368
    Top = 184
  end
  object Query1: TQuery
    DatabaseName = 'db_vipdl'
    SQL.Strings = (
      'select * from t_d_config where '
      ' Upper(PAR_NAME)='#39'BRANDNAME'#39)
    Left = 312
    Top = 184
  end
  object Query3: TQuery
    DatabaseName = 'db_vipdl'
    SQL.Strings = (
      'select * from t_d_config where '
      ' Upper(PAR_NAME)='#39'CUSTATT'#39)
    Left = 456
    Top = 184
  end
end