untprovider_m.dfm

用delphi编写的数据库管理软件

inherited frmProvider_M: TfrmProvider_M
  Left = 251
  Top = 101
  Caption = #20379#24212#21830#36164#26009
  ClientHeight = 401
  ClientWidth = 475
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 345
    Width = 475
    inherited Bevel1: TBevel
      Width = 443
      Height = 3
    end
    inherited btnExit: TButton
      Left = 377
    end
    inherited btnSave: TButton
      Left = 300
    end
  end
  inherited pnedit: TPanel
    Width = 475
    Height = 345
    inherited Label1: TLabel
      Left = 15
      Width = 65
      Caption = #20379#24212#21830#32534#30721
    end
    inherited Label2: TLabel
      Left = 18
      Top = 51
      Width = 26
      Caption = #21517#31216
    end
    object Label9: TLabel [2]
      Left = 18
      Top = 78
      Width = 26
      Height = 13
      Caption = #20840#31216
    end
    object Label11: TLabel [3]
      Left = 18
      Top = 105
      Width = 52
      Height = 13
      Caption = #33521#25991#21517#31216
    end
    object Label16: TLabel [4]
      Left = 18
      Top = 132
      Width = 52
      Height = 13
      Caption = #24320#25143#38134#34892
    end
    object Label5: TLabel [5]
      Left = 18
      Top = 159
      Width = 26
      Height = 13
      Caption = #22320#22336
    end
    object Label8: TLabel [6]
      Left = 18
      Top = 187
      Width = 39
      Height = 13
      Caption = #32852#31995#20154
    end
    object Label7: TLabel [7]
      Left = 18
      Top = 214
      Width = 39
      Height = 13
      Caption = #36523#20221#35777
    end
    object Label10: TLabel [8]
      Left = 18
      Top = 241
      Width = 52
      Height = 13
      Caption = #39550#39542#35777#21495
    end
    object Label21: TLabel [9]
      Left = 18
      Top = 268
      Width = 42
      Height = 13
      Caption = 'E_Mail'
    end
    object Label19: TLabel [10]
      Left = 18
      Top = 295
      Width = 26
      Height = 13
      Caption = #22791#27880
    end
    object Label18: TLabel [11]
      Left = 18
      Top = 323
      Width = 26
      Height = 13
      Caption = #29366#24577
    end
    object Label3: TLabel [12]
      Left = 267
      Top = 23
      Width = 65
      Height = 13
      Caption = #20379#24212#21830#31867#22411
    end
    object Label4: TLabel [13]
      Left = 275
      Top = 50
      Width = 52
      Height = 13
      Caption = #25152#23646#22320#21306
    end
    object Label15: TLabel [14]
      Left = 275
      Top = 78
      Width = 26
      Height = 13
      Caption = #31246#21495
    end
    object Label25: TLabel [15]
      Left = 275
      Top = 105
      Width = 52
      Height = 13
      Caption = #21551#29992#26085#26399
    end
    object Label17: TLabel [16]
      Left = 275
      Top = 133
      Width = 52
      Height = 13
      Caption = #38134#34892#24080#21495
    end
    object Label6: TLabel [17]
      Left = 275
      Top = 160
      Width = 26
      Height = 13
      Caption = #37038#32534
    end
    object Label20: TLabel [18]
      Left = 275
      Top = 188
      Width = 26
      Height = 13
      Caption = #32844#21153
    end
    object Label14: TLabel [19]
      Left = 275
      Top = 215
      Width = 26
      Height = 13
      Caption = #30005#35805
    end
    object Label13: TLabel [20]
      Left = 275
      Top = 243
      Width = 26
      Height = 13
      Caption = #25163#26426
    end
    object Label12: TLabel [21]
      Left = 275
      Top = 271
      Width = 26
      Height = 13
      Caption = #20256#30495
    end
    inherited DBEDITcode: TwwDBEdit
      Left = 82
      Font.Color = clWindowText
    end
    inherited wwDBEdit1: TwwDBEdit
      Left = 82
      Top = 49
      Width = 190
      Font.Color = clWindowText
    end
    object wwCheckBox1: TwwCheckBox
      Left = 82
      Top = 321
      Width = 89
      Height = 17
      Hint = 'fstate'
      DisableThemes = False
      AlwaysTransparent = False
      ValueChecked = 'True'
      ValueUnchecked = 'False'
      DisplayValueChecked = 'True'
      DisplayValueUnchecked = 'False'
      NullAndBlankState = cbUnchecked
      Caption = #26469#24448#29366#24577
      TabOrder = 2
    end
    object wwDBEdit15: TwwDBEdit
      Left = 82
      Top = 293
      Width = 378
      Height = 21
      Hint = 'fremark'
      TabOrder = 3
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit16: TwwDBEdit
      Left = 82
      Top = 266
      Width = 190
      Height = 21
      Hint = 'femail'
      TabOrder = 4
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit6: TwwDBEdit
      Left = 82
      Top = 239
      Width = 190
      Height = 21
      Hint = 'fdriveidno'
      TabOrder = 5
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit5: TwwDBEdit
      Left = 82
      Top = 212
      Width = 190
      Height = 21
      Hint = 'fidno'
      TabOrder = 6
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit4: TwwDBEdit
      Left = 82
      Top = 185
      Width = 190
      Height = 21
      Hint = 'fconnect'
      TabOrder = 7
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit3: TwwDBEdit
      Left = 82
      Top = 157
      Width = 190
      Height = 21
      Hint = 'faddress'
      TabOrder = 8
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit13: TwwDBEdit
      Left = 82
      Top = 130
      Width = 190
      Height = 21
      Hint = 'fbank'
      TabOrder = 9
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit12: TwwDBEdit
      Left = 82
      Top = 103
      Width = 190
      Height = 21
      Hint = 'fename'
      TabOrder = 10
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit8: TwwDBEdit
      Left = 82
      Top = 76
      Width = 190
      Height = 21
      Hint = 'ffullname'
      TabOrder = 11
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit7: TwwDBEdit
      Left = 335
      Top = 269
      Width = 121
      Height = 21
      Hint = 'ffax'
      TabOrder = 12
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit10: TwwDBEdit
      Left = 335
      Top = 245
      Width = 121
      Height = 21
      Hint = 'fmobile'
      TabOrder = 13
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit9: TwwDBEdit
      Left = 335
      Top = 215
      Width = 120
      Height = 21
      Hint = 'ftel'
      TabOrder = 14
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit17: TwwDBEdit
      Left = 335
      Top = 187
      Width = 121
      Height = 21
      Hint = 'fposition'
      TabOrder = 15
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit2: TwwDBEdit
      Left = 335
      Top = 157
      Width = 121
      Height = 21
      Hint = 'fpost'
      TabOrder = 16
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit14: TwwDBEdit
      Left = 335
      Top = 133
      Width = 121
      Height = 21
      Hint = 'fbankno'
      TabOrder = 17
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object DBDateTimeEditEh2: TDBDateTimeEditEh
      Left = 335
      Top = 106
      Width = 120
      Height = 21
      Hint = 'fstartdate'
      EditButtons = <>
      Kind = dtkDateEh
      TabOrder = 18
      Visible = True
    end
    object wwDBEdit11: TwwDBEdit
      Left = 335
      Top = 79
      Width = 120
      Height = 21
      Hint = 'ftax'
      TabOrder = 19
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBLookupCombo2: TwwDBLookupCombo
      Left = 335
      Top = 52
      Width = 120
      Height = 21
      Hint = 'farea'
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'fName'#9'26'#9#22320#21306#21517#31216#9'F'
        'fCode'#9'16'#9#32534#30721#9'F')
      LookupTable = CDSArea
      LookupField = 'fname'
      Options = [loColLines, loRowLines, loTitles, loFixedDropDownHeight, loSearchOnBackspace]
      Style = csDropDownList
      TabOrder = 20
      AutoDropDown = False
      ShowButton = True
      PreciseEditRegion = False
      AllowClearKey = False
    end
    object wwDBLookupCombo1: TwwDBLookupCombo
      Left = 335
      Top = 20
      Width = 120
      Height = 21
      Hint = 'fcustomertype'
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'fname'#9'20'#9#31867#22411#21517#31216#9'F'#9
        'fcode'#9'10'#9#20195#30721#9'F'#9)
      LookupTable = CDSType
      LookupField = 'fname'
      Options = [loColLines, loRowLines, loTitles, loFixedDropDownHeight, loSearchOnBackspace]
      Style = csDropDownList
      TabOrder = 21
      AutoDropDown = False
      ShowButton = True
      PreciseEditRegion = False
      AllowClearKey = False
    end
  end
  object CDSType: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 368
    Top = 8
    object CDSTypefname: TWideStringField
      DisplayLabel = #31867#22411#21517#31216
      DisplayWidth = 20
      FieldName = 'fname'
      Size = 32
    end
    object CDSTypefcode: TWideStringField
      DisplayLabel = #20195#30721
      DisplayWidth = 10
      FieldName = 'fcode'
    end
    object CDSTypefid: TAutoIncField
      DisplayWidth = 10
      FieldName = 'fid'
      ReadOnly = True
      Visible = False
    end
    object CDSTypefremark: TWideStringField
      DisplayWidth = 50
      FieldName = 'fremark'
      Visible = False
      Size = 50
    end
  end
  object CDSArea: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 360
    Top = 80
    object CDSAreafID: TIntegerField
      FieldName = 'fID'
    end
    object CDSAreafParentID: TIntegerField
      FieldName = 'fParentID'
    end
    object CDSAreafParentCode: TWideStringField
      FieldName = 'fParentCode'
      Size = 50
    end
    object CDSAreafCode: TWideStringField
      FieldName = 'fCode'
      Size = 50
    end
    object CDSAreafName: TWideStringField
      FieldName = 'fName'
      Size = 50
    end
    object CDSAreafNotes: TWideStringField
      FieldName = 'fNotes'
      Size = 80
    end
  end
end