frmvendormanage.dfm

非常地全面完整的物流供应链管理系统 包含全部的需求文档

object FormVendorManage: TFormVendorManage
  Left = 215
  Top = 134
  Width = 579
  Height = 517
  Caption = 'FormVendorManage'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 12
  object Label19: TLabel
    Left = 200
    Top = 48
    Width = 24
    Height = 12
    Caption = #31561#20110
  end
  object LCDBOperatTool1: TLCDBOperatTool
    Left = 8
    Top = 0
    Width = 513
    Height = 25
    VisibleBtn = [tbAdd, tbEdit, tbPost, tbCancel]
    EnabledBtn = [tbAdd, tbEdit, tbPost, tbCancel]
    DelConfirmId = 'PurchaseDeVendorManage'
    DataSource = DSVendor
    OnClick = LCDBOperatTool1Click
  end
  object PageControl1: TPageControl
    Left = 15
    Top = 88
    Width = 546
    Height = 233
    ActivePage = TabSheet1
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #19968#33324#20449#24687
      object Label2: TLabel
        Left = 160
        Top = 16
        Width = 48
        Height = 12
        Caption = #26597#35810#23494#30721
      end
      object Label1: TLabel
        Left = 8
        Top = 16
        Width = 24
        Height = 12
        Caption = #32534#21495
      end
      object Label5: TLabel
        Left = 336
        Top = 24
        Width = 48
        Height = 12
        Caption = #37038#25919#32534#30721
      end
      object Label6: TLabel
        Left = 0
        Top = 112
        Width = 48
        Height = 12
        Caption = #32852#31995#30005#35805
      end
      object Label7: TLabel
        Left = 208
        Top = 120
        Width = 24
        Height = 12
        Caption = #25163#26426
      end
      object Label3: TLabel
        Left = 8
        Top = 56
        Width = 24
        Height = 12
        Caption = #21517#31216
      end
      object Label4: TLabel
        Left = 8
        Top = 88
        Width = 24
        Height = 12
        Caption = #22320#22336
      end
      object Label8: TLabel
        Left = 16
        Top = 152
        Width = 24
        Height = 12
        Caption = #20256#30495
      end
      object Label10: TLabel
        Left = 320
        Top = 58
        Width = 30
        Height = 12
        Caption = 'email'
      end
      object Label9: TLabel
        Left = 336
        Top = 90
        Width = 36
        Height = 12
        Caption = #32852#31995#20154
      end
      object Label11: TLabel
        Left = 216
        Top = 162
        Width = 48
        Height = 12
        Caption = #20844#21496#32593#22336
      end
      object DBEdtId: TDBEdit
        Left = 40
        Top = 16
        Width = 105
        Height = 20
        DataField = 'Id'
        DataSource = DSVendor
        TabOrder = 0
      end
      object DBEdtPassword: TDBEdit
        Left = 216
        Top = 16
        Width = 97
        Height = 20
        DataField = 'Password'
        DataSource = DSVendor
        TabOrder = 1
      end
      object DBEdtZipCode: TDBEdit
        Left = 392
        Top = 16
        Width = 121
        Height = 20
        DataField = 'ZipCode'
        DataSource = DSVendor
        TabOrder = 2
      end
      object DBEdtName: TDBEdit
        Left = 40
        Top = 56
        Width = 265
        Height = 20
        DataField = 'Name'
        DataSource = DSVendor
        TabOrder = 3
      end
      object DBEdtAddress: TDBEdit
        Left = 40
        Top = 80
        Width = 265
        Height = 20
        DataField = 'Address'
        DataSource = DSVendor
        TabOrder = 4
      end
      object DBEdtTel: TDBEdit
        Left = 56
        Top = 112
        Width = 105
        Height = 20
        DataField = 'Telephone'
        DataSource = DSVendor
        TabOrder = 5
      end
      object DBEdtMobile: TDBEdit
        Left = 248
        Top = 120
        Width = 105
        Height = 20
        DataField = 'MobilePhone'
        DataSource = DSVendor
        TabOrder = 6
      end
      object DBEdtFax: TDBEdit
        Left = 48
        Top = 152
        Width = 129
        Height = 20
        DataField = 'Fax'
        DataSource = DSVendor
        TabOrder = 7
      end
      object DBEdtEmail: TDBEdit
        Left = 368
        Top = 56
        Width = 145
        Height = 20
        DataField = 'Email'
        DataSource = DSVendor
        TabOrder = 8
      end
      object DBEdtContactMan: TDBEdit
        Left = 392
        Top = 88
        Width = 129
        Height = 20
        DataField = 'ContactMan'
        DataSource = DSVendor
        TabOrder = 9
      end
      object DBEdtWebSite: TDBEdit
        Left = 272
        Top = 160
        Width = 145
        Height = 20
        DataField = 'WebSite'
        DataSource = DSVendor
        TabOrder = 10
      end
    end
    object TabSheet2: TTabSheet
      Caption = #20854#20182#20449#24687
      ImageIndex = 1
      object Label12: TLabel
        Left = 8
        Top = 162
        Width = 72
        Height = 12
        Caption = #34892#25919#21306#21010#32534#30721
      end
      object Label13: TLabel
        Left = 232
        Top = 50
        Width = 48
        Height = 12
        Caption = #24448#26469#38134#34892
      end
      object Label14: TLabel
        Left = 16
        Top = 10
        Width = 48
        Height = 12
        Caption = #38134#34892#24080#21495
      end
      object Label15: TLabel
        Left = 216
        Top = 130
        Width = 60
        Height = 12
        Caption = #19994#21153#21592#25163#26426
      end
      object Label16: TLabel
        Left = 0
        Top = 82
        Width = 60
        Height = 12
        Caption = #19994#21153#21592#22995#21517
      end
      object Label17: TLabel
        Left = 8
        Top = 122
        Width = 60
        Height = 12
        Caption = #19994#21153#21592#30005#35805
      end
      object Label18: TLabel
        Left = 16
        Top = 42
        Width = 48
        Height = 12
        Caption = #20184#27454#26041#24335
      end
      object DBEdBankAccount: TDBEdit
        Left = 64
        Top = 8
        Width = 241
        Height = 20
        DataField = 'BankAccount'
        DataSource = DSVendor
        TabOrder = 0
      end
      object DBEdPayType: TDBEdit
        Left = 72
        Top = 40
        Width = 129
        Height = 20
        DataField = 'PayType'
        DataSource = DSVendor
        TabOrder = 1
      end
      object DBEdtCurrentBank: TDBEdit
        Left = 344
        Top = 48
        Width = 145
        Height = 20
        DataField = 'CurrentBank'
        DataSource = DSVendor
        TabOrder = 2
      end
      object DBEdOperatorName: TDBEdit
        Left = 64
        Top = 80
        Width = 233
        Height = 20
        DataField = 'Operatorname'
        DataSource = DSVendor
        TabOrder = 3
      end
      object DBEdtOperatorPhone: TDBEdit
        Left = 72
        Top = 120
        Width = 137
        Height = 20
        DataField = 'OperatorTelePhone'
        DataSource = DSVendor
        TabOrder = 4
      end
      object DBEdtOperatorMobilePhone: TDBEdit
        Left = 304
        Top = 128
        Width = 225
        Height = 20
        DataField = 'OperatorMobilePhone'
        DataSource = DSVendor
        TabOrder = 5
      end
      object DBSelectDlgEdit1: TDBSelectDlgEdit
        Left = 96
        Top = 160
        Width = 129
        Height = 25
        EditWidth = 109
        ButtonWidth = 20
        ListDataField = 'id'
        ListDataSource = DSRegion
        DataField = 'RegionId'
        DataSource = DSVendor
        ReadOnly = False
      end
    end
  end
  object DBGrid1: TDBGrid
    Left = 15
    Top = 347
    Width = 553
    Height = 129
    DataSource = DSVendor
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
  end
  object CBField: TComboBox
    Left = 24
    Top = 40
    Width = 153
    Height = 20
    ItemHeight = 12
    TabOrder = 3
    Items.Strings = (
      #32534#21495'=Id'
      #21517#31216'=Name'
      #37038#32534'=ZipCode'
      #30005#23376#37038#20214'=Email'
      #22320#22336'=Address'
      #32852#31995#20154'=ContactMan'
      #24448#26469#38134#34892'=CurrentBank'
      #34892#25919#21306#21010#32534#30721'=RegionId')
  end
  object EdtSearchValue: TEdit
    Left = 256
    Top = 48
    Width = 129
    Height = 20
    TabOrder = 4
  end
  object BtnSearch: TButton
    Left = 408
    Top = 48
    Width = 49
    Height = 25
    Caption = #26597#25214
    TabOrder = 5
    OnClick = BtnSearchClick
  end
  object BtnExitSearch: TButton
    Left = 471
    Top = 48
    Width = 65
    Height = 25
    Caption = #36864#20986#25628#32034
    TabOrder = 6
    OnClick = BtnExitSearchClick
  end
  object SocketConVendor: TSocketConnection
    Connected = True
    ServerGUID = '{DFD6E4B0-4664-42F7-B84C-A0C64854C9CF}'
    ServerName = 'VendorData.mtsVendorObj'
    Address = '127.0.0.1'
    Left = 136
    Top = 176
  end
  object cdsVendor: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    ProviderName = 'dspVendor'
    RemoteServer = SocketConVendor
    Left = 195
    Top = 175
  end
  object cdsRegion: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    ProviderName = 'dspRegion'
    RemoteServer = SocketConVendor
    Left = 187
    Top = 231
  end
  object DSVendor: TDataSource
    DataSet = cdsVendor
    Left = 235
    Top = 175
  end
  object DSRegion: TDataSource
    DataSet = cdsRegion
    Left = 243
    Top = 231
  end
end