frmdepart.dfm

物流供应链管理系统

inherited FormDepart: TFormDepart
  Left = 220
  Top = 130
  Height = 415
  Caption = #37096#38376#36164#26009#31649#29702
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  inherited Label3: TLabel
    Left = 16
    Top = 168
  end
  object Label4: TLabel [3]
    Left = 32
    Top = 104
    Width = 36
    Height = 12
    Caption = #36127#36131#20154
  end
  object Label5: TLabel [4]
    Left = 272
    Top = 104
    Width = 48
    Height = 12
    Caption = #32852#31995#30005#35805
  end
  object Label6: TLabel [5]
    Left = 24
    Top = 144
    Width = 60
    Height = 12
    Caption = #32852#31995#20154#25163#26426
  end
  object Label7: TLabel [6]
    Left = 288
    Top = 144
    Width = 24
    Height = 12
    Caption = #20256#30495
  end
  inherited LCDBOperatTool1: TLCDBOperatTool
    Left = 0
    DelConfirmId = 'DataDepart'
    OnModeChange = LCDBOperatTool1ModeChange
  end
  inherited DBEdtId: TDBEdit
    DataField = 'Id'
    Enabled = False
  end
  inherited DBEdtName: TDBEdit
    DataField = 'Name'
  end
  inherited DBMemoRemark: TDBMemo
    Top = 184
    Height = 41
  end
  inherited DBGrid1: TDBGrid
    Top = 232
  end
  object Button1: TButton [12]
    Left = 224
    Top = 104
    Width = 33
    Height = 17
    Caption = '...'
    TabOrder = 5
    OnClick = Button1Click
  end
  object DBEdtPrincipal: TDBEdit [13]
    Left = 80
    Top = 104
    Width = 129
    Height = 20
    DataField = 'PrincipalId'
    DataSource = DataSource
    TabOrder = 6
  end
  object DBEdit2: TDBEdit [14]
    Left = 336
    Top = 96
    Width = 129
    Height = 20
    DataField = 'Telephone'
    DataSource = DataSource
    TabOrder = 7
  end
  object DBEdit3: TDBEdit [15]
    Left = 88
    Top = 136
    Width = 137
    Height = 20
    DataField = 'Mobilephone'
    DataSource = DataSource
    TabOrder = 8
  end
  object DBEdit4: TDBEdit [16]
    Left = 336
    Top = 136
    Width = 121
    Height = 20
    DataField = 'Fax'
    DataSource = DataSource
    TabOrder = 9
  end
  inherited ADOCon: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=GoodsManagementSystem_Data;Data Source=' +
      '127.0.0.1'
  end
  inherited ADOTable: TADOTable
    TableName = 't_Department'
  end
  object ADOTEmployee: TADOTable
    Connection = ADOCon
    TableName = 't_Employee'
    Left = 208
    Top = 136
  end
  object DSEmployee: TDataSource
    DataSet = ADOTEmployee
    Left = 248
    Top = 136
  end
  object ADOQ: TADOQuery
    Connection = ADOCon
    Parameters = <>
    Left = 288
    Top = 112
  end
end