upurchase.~dfm

在打沙场用的最简单

inherited frmpurchase: Tfrmpurchase
  Left = 19
  Top = 90
  Width = 760
  Height = 463
  Caption = #29289#26009#37319#36141
  PixelsPerInch = 96
  TextHeight = 12
  inherited paneltitle: TPanel
    Width = 752
    BevelInner = bvRaised
    inherited formTitle: TLabel
      Caption = #37319#36141
      Font.Height = -16
    end
    inherited Label3: TLabel
      Caption = #21442#32771#32534#21495
    end
    inherited refno: TwwDBEdit
      Height = 18
      DataField = 'frefno'
      DataSource = dsMaster
      ReadOnly = True
    end
  end
  inherited paneledit: TPanel
    Width = 752
    inherited Label1: TLabel
      Caption = #21109#24314#20154
    end
    inherited Label2: TLabel
      Caption = #35330#36008#26085#26399
    end
    object Label5: TLabel [2]
      Left = 16
      Top = 32
      Width = 54
      Height = 15
      AutoSize = False
      Caption = #36127#36131#20154
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel [3]
      Left = 16
      Top = 56
      Width = 54
      Height = 15
      AutoSize = False
      Caption = #20379#24212#21830
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel [4]
      Left = 160
      Top = 8
      Width = 54
      Height = 15
      AutoSize = False
      Caption = #20179#24211
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel [5]
      Left = 160
      Top = 32
      Width = 54
      Height = 15
      AutoSize = False
      Caption = #20132#36135#26085#26399
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel [6]
      Left = 16
      Top = 80
      Width = 54
      Height = 15
      AutoSize = False
      Caption = #22791#27880
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    inherited Label4: TLabel
      Top = 8
      Width = 41
      Caption = #25209#21495
    end
    object Label11: TLabel [8]
      Left = 188
      Top = 57
      Width = 24
      Height = 12
      Caption = #21333#20215
    end
    inherited Label17: TLabel
      Left = 484
      Top = 56
    end
    inherited wwDBDateTimePicker1: TwwDBDateTimePicker
      Height = 18
      DataField = 'fcreadate'
      DataSource = dsMaster
      TabOrder = 7
    end
    inherited wwDBEdit1: TwwDBEdit
      Height = 18
      DataField = 'fcreauser'
      DataSource = dsMaster
      TabOrder = 6
    end
    object wwDBEdit4: TwwDBEdit [12]
      Left = 68
      Top = 28
      Width = 87
      Height = 20
      DataField = 'fpurer'
      DataSource = dsMaster
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 1
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit5: TwwDBEdit [13]
      Left = 68
      Top = 52
      Width = 87
      Height = 20
      DataField = 'fprovider'
      DataSource = dsMaster
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 2
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit8: TwwDBEdit [14]
      Left = 68
      Top = 76
      Width = 165
      Height = 20
      DataField = 'fnote'
      DataSource = dsMaster
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 5
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    inherited billno: TwwDBEdit
      Top = 4
      DataField = 'fpurno'
      DataSource = dsMaster
      TabOrder = 0
    end
    object wwDBLookupCombo1: TwwDBLookupCombo [16]
      Left = 214
      Top = 4
      Width = 121
      Height = 20
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        #36873#39033#9'20'#9#36873#39033#9'F')
      DataField = 'fpurstore'
      DataSource = dsMaster
      LookupTable = CDSstore
      LookupField = #36873#39033
      Options = [loColLines, loRowLines, loTitles, loFixedDropDownHeight, loSearchOnBackspace]
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 3
      AutoDropDown = False
      ShowButton = True
      PreciseEditRegion = False
      AllowClearKey = False
    end
    object wwDBDateTimePicker2: TwwDBDateTimePicker [17]
      Left = 214
      Top = 28
      Width = 121
      Height = 20
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      DataField = 'fdelivdate'
      DataSource = dsMaster
      Epoch = 1950
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      ShowButton = True
      TabOrder = 4
    end
    object PDJComEdit1: TPDJComEdit [18]
      Left = 344
      Top = 52
      Width = 121
      Height = 20
      Copyright = 'Copyright ?2000-2001 by [e-mail]'
      ButtonGlyphKind = gkSearch
      ButtonCursor = cuArrow
      OnClickButton = PDJComEdit1ClickButton
      ButtonGlyph.Data = {
        AE010000424DAE0100000000000042000000280000000D0000000D0000000100
        1000030000006C01000000000000000000000000000000000000007C0000E003
        00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000000018631F7C00001F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F001000100000001F7C00001F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F0010001F00100000001F7C00001F7C1F7C1F7C1F7C1F7C
        1F7C104210001F00100000001F7C1F7C00001F7C1F7C1F7C0000000000000000
        FF7F100000001F7C1F7C1F7C00001F7C1F7C00001863FF7FFF03100200000000
        1F7C1F7C1F7C1F7C00001F7C10421863FF03FF03FF03FF7F100200001F7C1F7C
        1F7C1F7C00001F7C1042FF03FF7FFF03FF7FFF03FF0300001F7C1F7C1F7C1F7C
        00001F7C1042FF03FF7FFF7FFF7FFF03FF7F00001F7C1F7C1F7C1F7C00001F7C
        1042FF7FFF03FF7FFF03FF7F186300001F7C1F7C1F7C1F7C00001F7C1F7C1042
        FF7FFF03FF7F186300001F7C1F7C1F7C1F7C1F7C00001F7C1F7C1F7C10421042
        104210421F7C1F7C1F7C1F7C1F7C1F7C0000}
      Visible = False
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 8
    end
    object BitBtn1: TBitBtn [19]
      Left = 632
      Top = 40
      Width = 75
      Height = 25
      Caption = 'BitBtn1'
      TabOrder = 9
      Visible = False
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn [20]
      Left = 632
      Top = 16
      Width = 89
      Height = 25
      Caption = #21517#31281#21295#32317#34920
      TabOrder = 10
      Visible = False
      OnClick = BitBtn2Click
    end
    object wwDBEdit3: TwwDBEdit [21]
      Left = 214
      Top = 53
      Width = 121
      Height = 20
      DataField = 'fprice'
      DataSource = dsMaster
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 11
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit2: TwwDBEdit [22]
      Left = 236
      Top = 76
      Width = 157
      Height = 20
      DataField = 'fnote1'
      DataSource = dsMaster
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 12
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit6: TwwDBEdit [23]
      Left = 398
      Top = 76
      Width = 168
      Height = 20
      DataField = 'fnote2'
      DataSource = dsMaster
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 13
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit7: TwwDBEdit [24]
      Left = 570
      Top = 76
      Width = 160
      Height = 20
      DataField = 'fnote3'
      DataSource = dsMaster
      ImeName = #26234#33021#38472#26725#36755#20837#24179#21488'  5.4'
      TabOrder = 14
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    inherited bb: TwwDBEdit
      Left = 513
      Top = 51
      Width = 57
      DataField = 'bb'
      DataSource = dsMaster
      TabOrder = 15
    end
  end
  inherited panelbutton: TPanel
    Top = 405
    Width = 752
    inherited spbtnsave: TSpeedButton
      Caption = '&S'#23384' '#30436
    end
    inherited SpeedButton2: TSpeedButton
      Caption = #21034#38500
    end
  end
  inherited Grid: TDBGridEh
    Width = 752
    Height = 261
    Columns = <
      item
        EditButtons = <>
        FieldName = 'js'
        Footers = <>
        Title.Caption = #20214#25976
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'avgh'
        Footers = <>
        Title.Caption = #24179#22343#35336#29992'('#23433#22763')'
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'qtyunit'
        Footers = <>
        Title.Caption = #35336#37327#21934#20301'('#23433#22763')'
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'rs'
        Footers = <>
        Title.Caption = #26579#25613
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'dps'
        Footers = <>
        Title.Caption = #25171#25340#25613
        Visible = False
      end
      item
        EditButtons = <>