unit6.dfm

基于ACESS数据库的小型进销存管理软件。

object Form6: TForm6
  Left = 223
  Top = 113
  Width = 548
  Height = 226
  Caption = 'Form6'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 208
    Top = 136
    Width = 15
    Height = 13
    Caption = 'TO'
  end
  object Label2: TLabel
    Left = 16
    Top = 144
    Width = 72
    Height = 13
    Caption = #35831#36873#25321#26102#38388#27573
  end
  object CheckBox1: TCheckBox
    Left = 24
    Top = 16
    Width = 73
    Height = 17
    Caption = #20379#36135#21333#20301
    TabOrder = 0
    OnClick = CheckBox1Click
  end
  object inB: TDBLookupComboBox
    Left = 104
    Top = 16
    Width = 145
    Height = 21
    Enabled = False
    KeyField = 'InB'
    ListField = 'InB'
    ListSource = DataSource1
    TabOrder = 1
    OnClick = inBClick
  end
  object CheckBox2: TCheckBox
    Left = 24
    Top = 56
    Width = 73
    Height = 17
    Caption = #21697#31181#31867#21035
    TabOrder = 2
    OnClick = CheckBox2Click
  end
  object ind: TDBLookupComboBox
    Left = 104
    Top = 56
    Width = 145
    Height = 21
    Enabled = False
    KeyField = 'InD'
    ListField = 'InD'
    ListSource = DataSource1
    TabOrder = 3
    OnClick = indClick
  end
  object CheckBox3: TCheckBox
    Left = 24
    Top = 96
    Width = 73
    Height = 17
    Caption = #36827#20179#21697#31181
    TabOrder = 4
    OnClick = CheckBox3Click
  end
  object CheckBox4: TCheckBox
    Left = 304
    Top = 16
    Width = 65
    Height = 17
    Caption = #25910#36135#20154
    TabOrder = 5
    OnClick = CheckBox4Click
  end
  object ini: TDBLookupComboBox
    Left = 392
    Top = 16
    Width = 145
    Height = 21
    Enabled = False
    KeyField = 'InI'
    ListField = 'InI'
    ListSource = DataSource1
    TabOrder = 6
    OnClick = iniClick
  end
  object CheckBox5: TCheckBox
    Left = 304
    Top = 56
    Width = 73
    Height = 17
    Caption = #36865#36135#36710#21495
    TabOrder = 7
    OnClick = CheckBox5Click
  end
  object inj: TDBLookupComboBox
    Left = 392
    Top = 56
    Width = 145
    Height = 21
    Enabled = False
    KeyField = 'InJ'
    ListField = 'InJ'
    ListSource = DataSource1
    TabOrder = 8
    OnClick = injClick
  end
  object CheckBox6: TCheckBox
    Left = 304
    Top = 96
    Width = 73
    Height = 17
    Caption = #37319#36141#21592
    TabOrder = 9
    OnClick = CheckBox6Click
  end
  object inK: TDBLookupComboBox
    Left = 392
    Top = 96
    Width = 145
    Height = 21
    Enabled = False
    KeyField = 'InK'
    ListField = 'InK'
    ListSource = DataSource1
    TabOrder = 10
    OnClick = inKClick
  end
  object Button1: TButton
    Left = 336
    Top = 136
    Width = 75
    Height = 25
    Caption = #36827#20179#31649#29702
    TabOrder = 11
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 448
    Top = 136
    Width = 75
    Height = 25
    Caption = #36827#20179#26597#35810
    TabOrder = 12
    OnClick = Button2Click
  end
  object startime: TDateTimePicker
    Left = 112
    Top = 136
    Width = 81
    Height = 21
    CalAlignment = dtaLeft
    Date = 38626.3831989931
    Time = 38626.3831989931
    DateFormat = dfShort
    DateMode = dmComboBox
    Kind = dtkDate
    ParseInput = False
    TabOrder = 13
  end
  object endtime: TDateTimePicker
    Left = 248
    Top = 136
    Width = 81
    Height = 21
    CalAlignment = dtaLeft
    Date = 38626.3838870139
    Time = 38626.3838870139
    DateFormat = dfShort
    DateMode = dmComboBox
    Kind = dtkDate
    ParseInput = False
    TabOrder = 14
  end
  object Edit1: TEdit
    Left = 104
    Top = 96
    Width = 145
    Height = 21
    CharCase = ecUpperCase
    TabOrder = 15
  end
  object ADOTable1: TADOTable
    Active = True
    ConnectionString = 
      'Provider=MSDASQL.1;Persist Security Info=False;Data Source=MS Ac' +
      'cess Database;Initial Catalog=jxc'
    CursorType = ctStatic
    TableName = 'IO'
    Left = 24
    Top = 168
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 48
    Top = 168
  end
  object ADOQuery1: TADOQuery
    ConnectionString = 
      'Provider=MSDASQL.1;Persist Security Info=False;Data Source=MS Ac' +
      'cess Database;Initial Catalog=jxc'
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      '')
    Top = 168
  end
  object frReport1: TfrReport
    Dataset = frDBDataSet1
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    RebuildPrinter = False
    Left = 96
    Top = 168
    ReportForm = {19000000}
  end
  object frDBDataSet1: TfrDBDataSet
    DataSet = ADOQuery1
    Left = 72
    Top = 168
  end
end