udingdan.dfm

本文阐述了目前CRM（Customer Relationship Management 客户关系管理）的管理方法

object dingdan: Tdingdan
  Left = 208
  Top = 257
  BorderStyle = bsDialog
  Caption = #35746#21333#31649#29702
  ClientHeight = 446
  ClientWidth = 737
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 56
    Top = 352
    Width = 36
    Height = 13
    AutoSize = False
    Caption = #21830#21697#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 56
    Top = 320
    Width = 36
    Height = 13
    AutoSize = False
    Caption = #21830#24215#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 280
    Top = 320
    Width = 36
    Height = 13
    AutoSize = False
    Caption = #20215#26684#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 280
    Top = 352
    Width = 36
    Height = 13
    AutoSize = False
    Caption = #25968#37327#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 464
    Top = 320
    Width = 36
    Height = 13
    AutoSize = False
    Caption = #26102#38388#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 737
    Height = 41
    Align = alTop
    TabOrder = 0
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 41
    Width = 737
    Height = 256
    Align = alTop
    DataSource = DataSource1
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'client'
        Title.Caption = #21830#24215
        Width = 130
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'commodity'
        Title.Caption = #21830#21697
        Width = 130
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'out_price'
        Title.Caption = #21334#20986#20215
        Width = 130
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'count'
        Title.Caption = #25968#37327
        Width = 130
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'time'
        Title.Caption = #26102#38388
        Width = 130
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'finished'
        Title.Caption = #26159#21542#23436#25104
        Width = 130
        Visible = True
      end>
  end
  object BitBtn1: TBitBtn
    Left = 40
    Top = 400
    Width = 75
    Height = 25
    Caption = #39318#35760#24405
    TabOrder = 2
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 115
    Top = 400
    Width = 75
    Height = 25
    Caption = #19978#19968#26465
    TabOrder = 3
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 190
    Top = 400
    Width = 75
    Height = 25
    Caption = #19979#19968#26465
    TabOrder = 4
    OnClick = BitBtn3Click
  end
  object BitBtn4: TBitBtn
    Left = 265
    Top = 400
    Width = 75
    Height = 25
    Caption = #26411#35760#24405
    TabOrder = 5
    OnClick = BitBtn4Click
  end
  object BitBtn5: TBitBtn
    Left = 340
    Top = 400
    Width = 75
    Height = 25
    Caption = #28155#21152
    TabOrder = 6
  end
  object BitBtn6: TBitBtn
    Left = 416
    Top = 400
    Width = 75
    Height = 25
    Caption = #21024#38500
    TabOrder = 7
  end
  object BitBtn7: TBitBtn
    Left = 491
    Top = 400
    Width = 75
    Height = 25
    Caption = #20462#25913
    TabOrder = 8
  end
  object BitBtn8: TBitBtn
    Left = 566
    Top = 400
    Width = 75
    Height = 25
    Caption = #20445#23384
    Enabled = False
    TabOrder = 9
  end
  object Edit2: TEdit
    Left = 328
    Top = 315
    Width = 121
    Height = 21
    ReadOnly = True
    TabOrder = 10
    OnKeyPress = Edit2KeyPress
  end
  object DateTimePicker1: TDateTimePicker
    Left = 501
    Top = 314
    Width = 170
    Height = 21
    Date = 38504.027718634260000000
    Time = 38504.027718634260000000
    TabOrder = 11
  end
  object Edit3: TEdit
    Left = 328
    Top = 347
    Width = 121
    Height = 21
    TabOrder = 12
    OnKeyPress = Edit3KeyPress
  end
  object ComboBox1: TComboBox
    Left = 104
    Top = 315
    Width = 145
    Height = 21
    ItemHeight = 13
    TabOrder = 13
  end
  object ComboBox2: TComboBox
    Left = 104
    Top = 348
    Width = 145
    Height = 21
    ItemHeight = 13
    TabOrder = 14
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 128
    Top = 136
  end
  object ADOTable1: TADOTable
    Active = True
    Connection = Form2.ADOConnection1
    CursorType = ctStatic
    TableName = 'dingdan'
    Left = 176
    Top = 136
  end
  object ADOTable2: TADOTable
    Active = True
    Connection = Form2.ADOConnection1
    CursorType = ctStatic
    TableName = 'source'
    Left = 184
    Top = 184
  end
  object DataSource2: TDataSource
    DataSet = ADOTable2
    Left = 136
    Top = 184
  end
  object ADOTable3: TADOTable
    Active = True
    Connection = Form2.ADOConnection1
    CursorType = ctStatic
    TableName = 'maijia'
    Left = 232
    Top = 136
  end
  object ADOQuery1: TADOQuery
    Connection = Form2.ADOConnection1
    Parameters = <>
    Left = 232
    Top = 176
  end
  object ADOTable4: TADOTable
    Active = True
    Connection = Form2.ADOConnection1
    CursorType = ctStatic
    TableName = 'kucun'
    Left = 280
    Top = 136
  end
end