unitdata.dfm

社区服务系统

object frmData: TfrmData
  Left = 173
  Top = 208
  Width = 772
  Height = 528
  Caption = #25968#25454#23383#20856#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 764
    Height = 57
    Align = alTop
    Caption = #25805#20316#21306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object bbtnAdd: TBitBtn
      Left = 8
      Top = 16
      Width = 73
      Height = 33
      Caption = #28155#21152
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = bbtnAddClick
    end
    object bbtnModify: TBitBtn
      Left = 105
      Top = 16
      Width = 73
      Height = 33
      Caption = #20462#25913
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = bbtnModifyClick
    end
    object bbtnSave: TBitBtn
      Left = 203
      Top = 16
      Width = 73
      Height = 33
      Caption = #20445#23384
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = bbtnSaveClick
    end
    object bbtnCancel: TBitBtn
      Left = 301
      Top = 16
      Width = 73
      Height = 33
      Caption = #21462#28040
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = bbtnCancelClick
    end
    object bbtnExit: TBitBtn
      Left = 399
      Top = 16
      Width = 73
      Height = 33
      Caption = #36864#20986
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = bbtnExitClick
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 57
    Width = 505
    Height = 444
    Align = alLeft
    Caption = #25968#25454#23383#20856#21015#34920
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 2
      Top = 15
      Width = 501
      Height = 427
      Align = alClient
      Color = clBtnFace
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'DId'
          Title.Alignment = taCenter
          Title.Caption = #25968#25454#32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DTypeId'
          Title.Alignment = taCenter
          Title.Caption = #31867#22411#32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DTypeName'
          Title.Alignment = taCenter
          Title.Caption = #31867#22411#21517#31216
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DName'
          Title.Alignment = taCenter
          Title.Caption = #25968#25454#21517#31216
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DMemo'
          Title.Alignment = taCenter
          Title.Caption = #22791#27880
          Width = 100
          Visible = True
        end>
    end
  end
  object GroupBox3: TGroupBox
    Left = 505
    Top = 57
    Width = 259
    Height = 444
    Align = alClient
    Anchors = [akTop, akRight]
    Caption = #32534#36753#21306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    object Label1: TLabel
      Left = 20
      Top = 48
      Width = 81
      Height = 20
      AutoSize = False
      Caption = #25968#25454#32534#21495#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 20
      Top = 82
      Width = 81
      Height = 20
      AutoSize = False
      Caption = #25968#25454#31867#22411#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 20
      Top = 116
      Width = 81
      Height = 20
      AutoSize = False
      Caption = #25968#25454#21517#31216#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 11
      Top = 159
      Width = 81
      Height = 20
      AutoSize = False
      Caption = #22791'           '#27880#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object edtDId: TEdit
      Left = 93
      Top = 41
      Width = 146
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object edtDName: TEdit
      Left = 93
      Top = 108
      Width = 146
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object cbxDtypeName: TComboBox
      Left = 93
      Top = 74
      Width = 148
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 2
    end
    object MemData: TMemo
      Left = 24
      Top = 184
      Width = 215
      Height = 241
      Lines.Strings = (
        '')
      TabOrder = 3
    end
  end
  object adolist: TADOQuery
    AfterScroll = adolistAfterScroll
    Parameters = <>
    Left = 416
    Top = 97
  end
  object DataSource1: TDataSource
    DataSet = adolist
    Left = 352
    Top = 97
  end
end