frmconfirmsellbill.~dfm

这是一个商品管理系统

object FormConfirmSellBill: TFormConfirmSellBill
  Left = 275
  Top = 98
  BorderStyle = bsDialog
  Caption = #38144#21806#21333#30830#35748
  ClientHeight = 626
  ClientWidth = 800
  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 Shape1: TShape
    Left = 8
    Top = 352
    Width = 785
    Height = 1
  end
  object Label3: TLabel
    Left = 16
    Top = 368
    Width = 49
    Height = 17
    AutoSize = False
    Caption = #26102#38388
  end
  object Label4: TLabel
    Left = 368
    Top = 368
    Width = 49
    Height = 17
    AutoSize = False
    Caption = #21830#21697
  end
  object Label5: TLabel
    Left = 16
    Top = 400
    Width = 49
    Height = 17
    AutoSize = False
    Caption = #32463#25163#20154
  end
  object Label6: TLabel
    Left = 368
    Top = 400
    Width = 49
    Height = 17
    AutoSize = False
    Caption = #20179#24211
  end
  object Label7: TLabel
    Left = 16
    Top = 432
    Width = 49
    Height = 17
    AutoSize = False
    Caption = #20379#24212#21830
  end
  object Label8: TLabel
    Left = 368
    Top = 432
    Width = 57
    Height = 17
    AutoSize = False
    Caption = #36865#36135#26041#24335
  end
  object Label9: TLabel
    Left = 16
    Top = 464
    Width = 49
    Height = 17
    AutoSize = False
    Caption = #22791#27880
  end
  object Label10: TLabel
    Left = 544
    Top = 368
    Width = 49
    Height = 17
    AutoSize = False
    Caption = #25968#37327
  end
  object Shape2: TShape
    Left = 6
    Top = 584
    Width = 787
    Height = 1
  end
  object DataGrid: TDBGrid
    Left = 12
    Top = 64
    Width = 781
    Height = 281
    DataSource = DataSource1
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = DataGridCellClick
  end
  object BtnOK: TButton
    Left = 669
    Top = 596
    Width = 75
    Height = 25
    Caption = #36864#20986
    ModalResult = 1
    TabOrder = 1
  end
  object EditTime: TEdit
    Left = 80
    Top = 368
    Width = 273
    Height = 21
    ReadOnly = True
    TabOrder = 2
  end
  object EditNote: TEdit
    Left = 80
    Top = 464
    Width = 273
    Height = 113
    AutoSize = False
    ReadOnly = True
    TabOrder = 3
  end
  object EditSysUser: TEdit
    Left = 80
    Top = 400
    Width = 273
    Height = 21
    ReadOnly = True
    TabOrder = 4
  end
  object EditAmount: TEdit
    Left = 600
    Top = 368
    Width = 105
    Height = 21
    ReadOnly = True
    TabOrder = 5
  end
  object BtnConfirm: TButton
    Left = 472
    Top = 488
    Width = 193
    Height = 65
    Caption = #30830#35748#27492#38144#21806#21333
    Enabled = False
    TabOrder = 6
    OnClick = BtnConfirmClick
  end
  object RadioGroup1: TRadioGroup
    Left = 16
    Top = 8
    Width = 777
    Height = 49
    Caption = #26102#38388#33539#22260
    TabOrder = 7
  end
  object RBSeekToday: TRadioButton
    Left = 144
    Top = 32
    Width = 113
    Height = 17
    Caption = #26597#25214#20170#26085#36827#36135#21333
    TabOrder = 8
    OnClick = RBSeekTodayClick
  end
  object RBSeekWeek: TRadioButton
    Left = 312
    Top = 32
    Width = 113
    Height = 17
    Caption = #26597#25214#19968#21608#20869#36827#36135#21333
    TabOrder = 9
    OnClick = RBSeekWeekClick
  end
  object RBSeekMonth: TRadioButton
    Left = 488
    Top = 32
    Width = 113
    Height = 17
    Caption = #26597#25214#19968#26376#20869#36827#36135#21333
    TabOrder = 10
    OnClick = RBSeekMonthClick
  end
  object EditCustomer: TEdit
    Left = 80
    Top = 432
    Width = 273
    Height = 21
    ReadOnly = True
    TabOrder = 11
  end
  object EditDepot: TEdit
    Left = 432
    Top = 400
    Width = 273
    Height = 21
    ReadOnly = True
    TabOrder = 12
  end
  object EditPayment: TEdit
    Left = 432
    Top = 432
    Width = 273
    Height = 21
    ReadOnly = True
    TabOrder = 13
  end
  object EditCommodity: TEdit
    Left = 432
    Top = 368
    Width = 105
    Height = 21
    ReadOnly = True
    TabOrder = 14
  end
  object DataSource1: TDataSource
    DataSet = DataSetSellBill
    Left = 448
  end
  object DataSetSellBill: TADODataSet
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=CommodityManager;Data Source=127.0.0.1'
    Parameters = <>
    Left = 328
  end
  object DataSet: TADODataSet
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=CommodityManager;Data Source=127.0.0.1'
    Parameters = <>
    Left = 384
    Top = 496
  end
  object CmdConfirm: TADOCommand
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=CommodityManager;Data Source=127.0.0.1'
    Parameters = <>
    Left = 688
    Top = 504
  end
end