userpower.dfm

我觉得是很好的一个程序是关于房产中介的管理系统包跨哦出租出售求租求售的

inherited Frm_UserPower: TFrm_UserPower
  Left = 115
  Top = 146
  Width = 557
  Height = 376
  Caption = #29992#25143#31649#29702
  OldCreateOrder = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 8
    Top = 9
    Width = 521
    Height = 304
    BevelInner = bvLowered
    TabOrder = 0
    object dbgUserList: TDBGrid
      Left = 13
      Top = 10
      Width = 494
      Height = 281
      DataSource = ds_Data
      Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = 'Arial'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #29992#25143#21517
          Title.Alignment = taCenter
          Width = 154
          Visible = True
        end
        item
          Expanded = False
          FieldName = #23494#30721
          Title.Alignment = taCenter
          Width = 114
          Visible = True
        end
        item
          Expanded = False
          FieldName = #29992#25143#31561#32423
          PickList.Strings = (
            #31649#29702#21592
            #23458#25143)
          Title.Alignment = taCenter
          Width = 159
          Visible = True
        end>
    end
  end
  object btnAdd: TBitBtn
    Left = 193
    Top = 318
    Width = 63
    Height = 25
    Caption = #28155#21152
    TabOrder = 1
    OnClick = btnAddClick
  end
  object btnDelete: TBitBtn
    Left = 259
    Top = 318
    Width = 63
    Height = 25
    Caption = #21024#38500
    TabOrder = 2
    OnClick = btnDeleteClick
  end
  object btnClose: TBitBtn
    Left = 454
    Top = 318
    Width = 75
    Height = 25
    Caption = #20851#38381
    TabOrder = 3
    OnClick = btnCloseClick
  end
  object BitBtn1: TBitBtn
    Left = 368
    Top = 319
    Width = 75
    Height = 25
    Caption = #20445#23384
    TabOrder = 4
    OnClick = BitBtn1Click
    Glyph.Data = {
      36030000424D3603000000000000360000002800000010000000100000000100
      18000000000000030000C40E0000C40E00000000000000000000CED3D6CED3D6
      CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3
      D6CED3D6CED3D6CED3D6CED3D6CED3D600000000000000000000000000000000
      0000000000000000000000000000000000000000000000CED3D6CED3D6000000
      008684008684000000000000000000000000000000000000CED3D6CED3D60000
      00008684000000CED3D6CED3D600000000868400868400000000000000000000
      0000000000000000CED3D6CED3D6000000008684000000CED3D6CED3D6000000
      008684008684000000000000000000000000000000000000CED3D6CED3D60000
      00008684000000CED3D6CED3D600000000868400868400000000000000000000
      0000000000000000000000000000000000008684000000CED3D6CED3D6000000
      0086840086840086840086840086840086840086840086840086840086840086
      84008684000000CED3D6CED3D600000000868400868400000000000000000000
      0000000000000000000000000000008684008684000000CED3D6CED3D6000000
      008684000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D60000
      00008684000000CED3D6CED3D6000000008684000000CED3D6CED3D6CED3D6CE
      D3D6CED3D6CED3D6CED3D6CED3D6000000008684000000CED3D6CED3D6000000
      008684000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D60000
      00008684000000CED3D6CED3D6000000008684000000CED3D6CED3D6CED3D6CE
      D3D6CED3D6CED3D6CED3D6CED3D6000000008684000000CED3D6CED3D6000000
      008684000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D60000
      00000000000000CED3D6CED3D6000000008684000000CED3D6CED3D6CED3D6CE
      D3D6CED3D6CED3D6CED3D6CED3D6000000CED3D6000000CED3D6CED3D6000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CE
      D3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6}
  end
  object ds_Data: TDataSource
    DataSet = ADOQ_Data
    Left = 8
    Top = 320
  end
  object ADOQ_Data: TADOQuery
    Connection = DataModule1.ADOConnection1
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from '#29992#25143#20449#24687#34920' where '#29992#25143#31561#32423'<>'#39#36229#32423#29992#25143#39)
    Left = 100
    Top = 314
    object ADOQ_DataDSDesigner: TWideStringField
      FieldName = #29992#25143#21517
    end
    object ADOQ_DataDSDesigner2: TWideStringField
      FieldName = #23494#30721
      Size = 12
    end
    object ADOQ_DataDSDesigner3: TWideStringField
      FieldName = #29992#25143#31561#32423
      Size = 10
    end
  end
end