ppowko.~dfm

阀门厂的合同管理含销售 等

object FormPPOWKO: TFormPPOWKO
  Left = 192
  Top = 107
  Width = 560
  Height = 363
  Caption = #29983#20135#35745#21010
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 69
    Height = 13
    Caption = #23458#25143#20195#30721'       '
  end
  object Shape1: TShape
    Left = 8
    Top = 25
    Width = 73
    Height = 1
    Pen.Color = clWhite
  end
  object Label2: TLabel
    Left = 160
    Top = 8
    Width = 45
    Height = 13
    Caption = #21517#31216'       '
  end
  object Shape2: TShape
    Left = 160
    Top = 25
    Width = 73
    Height = 1
    Pen.Color = clWhite
  end
  object Label3: TLabel
    Left = 368
    Top = 8
    Width = 42
    Height = 13
    Caption = #32534#21495'      '
  end
  object Shape3: TShape
    Left = 368
    Top = 25
    Width = 105
    Height = 1
    Pen.Color = clWhite
  end
  object Label4: TLabel
    Left = 368
    Top = 28
    Width = 81
    Height = 13
    Caption = #39044#35745#23436#25104#26085'       '
  end
  object Shape4: TShape
    Left = 368
    Top = 45
    Width = 105
    Height = 1
    Pen.Color = clWhite
  end
  object Label5: TLabel
    Left = 368
    Top = 48
    Width = 93
    Height = 13
    Caption = #23458#25143#21442#32771#32534#21495'       '
  end
  object Shape5: TShape
    Left = 368
    Top = 65
    Width = 105
    Height = 1
    Pen.Color = clWhite
  end
  object Label6: TLabel
    Left = 368
    Top = 68
    Width = 99
    Height = 13
    Caption = #38144#21806#35746#21333#32534#21495'         '
  end
  object Shape6: TShape
    Left = 368
    Top = 85
    Width = 105
    Height = 1
    Pen.Color = clWhite
  end
  object Label7: TLabel
    Left = 368
    Top = 88
    Width = 57
    Height = 13
    Caption = #22788#29702#20154'       '
  end
  object Shape7: TShape
    Left = 368
    Top = 105
    Width = 105
    Height = 1
    Pen.Color = clWhite
  end
  object Label8: TLabel
    Left = 8
    Top = 31
    Width = 57
    Height = 13
    Caption = #32852#31995#20154'       '
  end
  object Shape8: TShape
    Left = 8
    Top = 48
    Width = 73
    Height = 1
    Pen.Color = clWhite
  end
  object Label9: TLabel
    Left = 160
    Top = 60
    Width = 69
    Height = 13
    Caption = #35746#21333#26085#26399'       '
  end
  object Shape9: TShape
    Left = 160
    Top = 77
    Width = 113
    Height = 1
    Pen.Color = clWhite
  end
  object Label10: TLabel
    Left = 160
    Top = 84
    Width = 69
    Height = 13
    Caption = #19979#36798#26085#26399'       '
  end
  object Shape10: TShape
    Left = 160
    Top = 101
    Width = 113
    Height = 1
    Pen.Color = clWhite
  end
  object Label11: TLabel
    Left = 160
    Top = 108
    Width = 69
    Height = 13
    Caption = #23436#25104#26085#26399'       '
  end
  object Shape11: TShape
    Left = 160
    Top = 125
    Width = 113
    Height = 1
    Pen.Color = clWhite
  end
  object Label12: TLabel
    Left = 8
    Top = 268
    Width = 45
    Height = 13
    Caption = #22791#27880'       '
  end
  object Shape12: TShape
    Left = 8
    Top = 285
    Width = 105
    Height = 1
    Pen.Color = clWhite
  end
  object DBEdit1: TDBEdit
    Left = 80
    Top = 8
    Width = 73
    Height = 18
    BorderStyle = bsNone
    DataField = 'CardCode'
    DataSource = DataSource1
    TabOrder = 0
    OnExit = DBEdit1Exit
  end
  object DBEdit3: TDBEdit
    Left = 192
    Top = 8
    Width = 153
    Height = 18
    BorderStyle = bsNone
    DataField = 'CustomName'
    DataSource = DataSource1
    TabOrder = 1
  end
  object DBEdit4: TDBEdit
    Left = 472
    Top = 8
    Width = 73
    Height = 18
    BorderStyle = bsNone
    DataField = 'OrderNum'
    DataSource = DataSource1
    TabOrder = 2
  end
  object DBEdit5: TDBEdit
    Left = 472
    Top = 28
    Width = 73
    Height = 18
    BorderStyle = bsNone
    DataField = 'ExpFinishD'
    DataSource = DataSource1
    TabOrder = 3
  end
  object DBEdit6: TDBEdit
    Left = 472
    Top = 48
    Width = 73
    Height = 18
    BorderStyle = bsNone
    DataField = 'NumInCustm'
    DataSource = DataSource1
    TabOrder = 4
  end
  object DBEdit7: TDBEdit
    Left = 472
    Top = 68
    Width = 73
    Height = 18
    BorderStyle = bsNone
    DataField = 'DocNum'
    DataSource = DataSource1
    TabOrder = 5
  end
  object DBEdit8: TDBEdit
    Left = 472
    Top = 88
    Width = 73
    Height = 18
    BorderStyle = bsNone
    DataField = 'FinishUser'
    DataSource = DataSource1
    TabOrder = 6
  end
  object DBEdit9: TDBEdit
    Left = 80
    Top = 31
    Width = 153
    Height = 18
    BorderStyle = bsNone
    DataField = 'CntctCode'
    DataSource = DataSource1
    TabOrder = 7
  end
  object DBEdit10: TDBEdit
    Left = 272
    Top = 60
    Width = 73
    Height = 18
    BorderStyle = bsNone
    DataField = 'OrderDate'
    DataSource = DataSource1
    TabOrder = 8
  end
  object DBEdit11: TDBEdit
    Left = 272
    Top = 84
    Width = 73
    Height = 18
    BorderStyle = bsNone
    DataField = 'ProdctDate'
    DataSource = DataSource1
    TabOrder = 9
  end
  object DBEdit12: TDBEdit
    Left = 272
    Top = 108
    Width = 73
    Height = 18
    BorderStyle = bsNone
    DataField = 'FinishDate'
    DataSource = DataSource1
    TabOrder = 10
  end
  object DBEdit2: TDBEdit
    Left = 112
    Top = 268
    Width = 433
    Height = 18
    BorderStyle = bsNone
    DataField = 'Memo'
    DataSource = DataSource1
    TabOrder = 11
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 128
    Width = 537
    Height = 121
    DataSource = DataSource2
    TabOrder = 12
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'ItemCode'
        Title.Caption = #29289#26009
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Descript'
        Title.Caption = #25551#36848
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Quantity'
        Title.Caption = #25968#37327
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Price'
        Title.Caption = #20215#26684
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ActWorkSum'
        Title.Caption = #24635#35745
        Visible = True
      end>
  end
  object Button1: TButton
    Left = 8
    Top = 304
    Width = 75
    Height = 25
    Caption = #30830#23450
    TabOrder = 13
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 88
    Top = 304
    Width = 75
    Height = 25
    Caption = #21462#28040
    TabOrder = 14
    OnClick = Button2Click
  end
  object DBRadioGroup1: TDBRadioGroup
    Left = 8
    Top = 50
    Width = 145
    Height = 73
    DataField = 'Status'
    DataSource = DataSource1
    Items.Strings = (
      #24037#20316#35746#21333
      #29983#20135#25351#20196
      #24037#20316#23436#25104)
    TabOrder = 15
    Values.Strings = (
      'O'
      'I'
      'E')
    OnChange = DBRadioGroup1Change
  end
  object Button3: TButton
    Left = 448
    Top = 305
    Width = 97
    Height = 23
    Caption = #20381#27425#28155#21152
    TabOrder = 16
    OnClick = Button3Click
  end
  object DataSource1: TDataSource
    DataSet = ADOQuP1
    Left = 240
    Top = 56
  end
  object DataSource2: TDataSource
    DataSet = ADOQuP2
    Left = 272
    Top = 176
  end
  object ADOQuP2: TADOQuery
    Parameters = <
      item
        Name = 'P0'
        DataType = ftVariant
        Value = 0c
      end>
    Left = 312
    Top = 120
  end
  object ADOQuP1: TADOQuery
    Connection = DataModHJ.ADOCon
    Parameters = <
      item
        Name = 'P0'
        DataType = ftVariant
        Value = 0c
      end>
    SQL.Strings = (
      '')
    Left = 264
    Top = 32
  end
end