object FormMain: TFormMain
  Left = 200
  Top = 119
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '编程天下技术群 - 管理系统'
  ClientHeight = 400
  ClientWidth = 688
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object gbMember: TGroupBox
    Left = 0
    Top = 26
    Width = 688
    Height = 250
    Align = alClient
    Caption = '成员列表'
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 2
      Top = 15
      Width = 684
      Height = 233
      Align = alClient
      DataSource = dsQry
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Tahoma'
      TitleFont.Style = []
      OnDblClick = DBGrid1DblClick
      Columns = <
        item
          Expanded = False
          FieldName = 'QQCode'
          Title.Alignment = taCenter
          Title.Caption = 'QQ 号码'
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'UserName'
          Title.Alignment = taCenter
          Title.Caption = '昵称'
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NameCard'
          Title.Alignment = taCenter
          Title.Caption = '群名片'
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Email'
          Title.Alignment = taCenter
          Title.Caption = 'Email 地址'
          Width = 140
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'WebSite'
          Title.Alignment = taCenter
          Title.Caption = '个人网站'
          Width = 140
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Status_FORMULA'
          Title.Alignment = taCenter
          Title.Caption = '状态'
          Width = 100
          Visible = True
        end>
    end
  end
  object gbOperation: TGroupBox
    Left = 0
    Top = 319
    Width = 688
    Height = 81
    Align = alBottom
    Caption = '成员操作'
    TabOrder = 1
    object lblSearchEvent: TLabel
      Left = 9
      Top = 27
      Width = 57
      Height = 13
      AutoSize = False
      Caption = '查询条件'
    end
    object lnlKeyWord: TLabel
      Left = 9
      Top = 54
      Width = 57
      Height = 13
      AutoSize = False
      Caption = '关键字'
    end
    object cbKey: TComboBox
      Left = 72
      Top = 51
      Width = 121
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 6
      Text = '有'
      Items.Strings = (
        '有'
        '无')
    end
    object edtKey: TEdit
      Left = 72
      Top = 51
      Width = 121
      Height = 21
      TabOrder = 4
    end
    object btnAddMember: TButton
      Left = 280
      Top = 24
      Width = 75
      Height = 48
      Caption = '添加成员'
      TabOrder = 0
      OnClick = btnAddMemberClick
    end
    object btnEditMember: TButton
      Left = 361
      Top = 24
      Width = 75
      Height = 48
      Caption = '修改成员'
      TabOrder = 1
      OnClick = btnEditMemberClick
    end
    object btnDeleteMember: TButton
      Left = 442
      Top = 24
      Width = 75
      Height = 48
      Caption = '删除成员'
      TabOrder = 2
      OnClick = btnDeleteMemberClick
    end
    object cbSearchEvent: TComboBox
      Left = 72
      Top = 24
      Width = 121
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      OnSelect = cbSearchEventSelect
      Items.Strings = (
        ''
        'QQ 号码'
        '昵称'
        '群名片'
        '警告记录'
        '成果记录')
    end
    object btnSearch: TButton
      Left = 199
      Top = 24
      Width = 75
      Height = 48
      Caption = '查询'
      DragCursor = crDefault
      TabOrder = 5
      OnClick = btnSearchClick
    end
    object btnAddWarn: TButton
      Left = 523
      Top = 24
      Width = 75
      Height = 48
      Caption = '添加警告'
      TabOrder = 7
      OnClick = btnAddWarnClick
    end
    object btnAddReseach: TButton
      Left = 604
      Top = 24
      Width = 75
      Height = 48
      Caption = '添加成果'
      TabOrder = 8
      OnClick = btnAddReseachClick
    end
  end
  object gbPages: TGroupBox
    Left = 0
    Top = 276
    Width = 688
    Height = 43
    Align = alBottom
    TabOrder = 2
    object lblPage: TLabel
      Left = 468
      Top = 13
      Width = 33
      Height = 13
      AutoSize = False
      Caption = '页码'
    end
    object btnFirst: TButton
      Left = 12
      Top = 8
      Width = 75
      Height = 25
      Caption = '第一页'
      TabOrder = 0
      OnClick = btnFirstClick
    end
    object btnNext: TButton
      Left = 174
      Top = 8
      Width = 75
      Height = 25
      Caption = '下一页'
      TabOrder = 1
      OnClick = btnNextClick
    end
    object btnPrior: TButton
      Left = 93
      Top = 8
      Width = 75
      Height = 25
      Caption = '上一页'
      TabOrder = 2
      OnClick = btnPriorClick
    end
    object btnLast: TButton
      Left = 255
      Top = 8
      Width = 75
      Height = 25
      Caption = '最后一页'
      TabOrder = 3
      OnClick = btnLastClick
    end
    object btnGoto: TButton
      Left = 604
      Top = 8
      Width = 75
      Height = 25
      Caption = '转到'
      TabOrder = 4
      OnClick = btnGotoClick
    end
    object edtPageCode: TEdit
      Left = 504
      Top = 10
      Width = 94
      Height = 21
      TabOrder = 5
    end
  end
  object tbMain: TToolBar
    Left = 0
    Top = 0
    Width = 688
    Height = 26
    AutoSize = True
    Caption = 'tbMain'
    Images = imgLst
    TabOrder = 3
    object tbAddMember: TToolButton
      Left = 0
      Top = 0
      AutoSize = True
      Caption = 'tbAddMember'
      ImageIndex = 0
      OnClick = btnAddMemberClick
    end
    object tbEditMember: TToolButton
      Left = 23
      Top = 0
      AutoSize = True
      Caption = 'tbEditMember'
      ImageIndex = 2
      OnClick = btnEditMemberClick
    end
    object ToolButton3: TToolButton
      Left = 46
      Top = 0
      Width = 8
      Caption = 'ToolButton3'
      ImageIndex = 2
      Style = tbsSeparator
    end
    object tbDeleteMember: TToolButton
      Left = 54
      Top = 0
      AutoSize = True
      Caption = 'tbDeleteMember'
      ImageIndex = 4
      OnClick = btnDeleteMemberClick
    end
    object ToolButton5: TToolButton
      Left = 77
      Top = 0
      Width = 8
      Caption = 'ToolButton5'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object tbAddWarn: TToolButton
      Left = 85
      Top = 0
      AutoSize = True
      Caption = 'tbAddWarn'
      ImageIndex = 6
      OnClick = btnAddWarnClick
    end
    object tbAddResearch: TToolButton
      Left = 108
      Top = 0
      AutoSize = True
      Caption = 'tbAddResearch'
      ImageIndex = 8
      OnClick = btnAddReseachClick
    end
    object ToolButton8: TToolButton
      Left = 131
      Top = 0
      Width = 8
      Caption = 'ToolButton8'
      ImageIndex = 5
      Style = tbsSeparator
    end
    object tbSearch: TToolButton
      Left = 139
      Top = 0
      AutoSize = True
      Caption = 'tbSearch'
      ImageIndex = 10
      OnClick = btnSearchClick
    end
    object ToolButton10: TToolButton
      Left = 162
      Top = 0
      Width = 8
      Caption = 'ToolButton10'
      ImageIndex = 6
      Style = tbsSeparator
    end
    object BtnHelp: TToolButton
      Left = 170
      Top = 0
      AutoSize = True
      Caption = 'BtnHelp'
      ImageIndex = 12
      OnClick = BtnHelpClick
    end
    object ToolButton12: TToolButton
      Left = 193
      Top = 0
      Width = 8
      Caption = 'ToolButton12'
      ImageIndex = 7
      Style = tbsSeparator
    end
    object BtnExit: TToolButton
      Left = 201
      Top = 0
      AutoSize = True
      Caption = 'BtnExit'
      ImageIndex = 14
      OnClick = BtnExitClick
    end
  end
  object imgLst: TImageList
    Left = 144
    Top = 88
    Bitmap = {
      [encoded data, 42496 characters]
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
  end
  object Connection: TADOConnection
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 16
    Top = 88
  end
  object Qry: TCnDHibernateQueryAdvance
    Active = False
    Aggregates = <>
    Params = <>
    Connection = Connection
    SQL.Strings = (
      'select * from [MEMBERS]')
    CurrentPage = 0
    TableName = 'MEMBERS'
    useFormula = True
    PKName = 'QQCODE'
    Left = 48
    Top = 88
  end
  object Idg: TCnDHibernateIdGenerator
    Connection = Connection
    Parameters = <>
    TableName = 'Idg'
    SeedFieldName = 'CODE'
    IdFieldName = 'NAME'
    CodeLength = 4
    Left = 80
    Top = 88
  end
  object dsQry: TDataSource
    DataSet = Qry
    Left = 112
    Top = 88
  end
end
