qing_gou_wei.dfm

采购管理系统：delphi+sql实现了企业采购自动化作业流程

        4080804080804080800040808040808040808040808040808040808040808040
        8080408080408080408080408080408080408080408080408080408080408080
        4080804080804080804080804080804080804080804080804080804080804080
        8040808040808040808040808040808040808040808040808000408080408080
        4080804080804080804080804080804080804080804080804080804080804080
        8040808040808040808040808040808040808040808040808040808040808040
        8080408080408080408080408080408080408080408080408080408080408080
        4080804080804080800040808040808040808040808040808040808040808040
        8080408080408080408080408080408080408080408080408080408080408080
        4080804080804080804080804080804080804080804080804080804080804080
        8040808040808040808040808040808040808040808040808000408080408080
        4080804080804080804080804080804080804080804080804080804080804080
        8040808040808040808040808040808040808040808040808040808040808040
        8080408080408080408080408080408080408080408080408080408080408080
        4080804080804080800040808040808040808040808040808040808040808040
        8080408080408080408080408080408080408080408080408080408080408080
        4080804080804080804080804080804080804080804080804080804080804080
        8040808040808040808040808040808040808040808040808000}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton13Click
    end
    object Label24: TLabel
      Left = 239
      Top = 86
      Width = 27
      Height = 13
      Caption = #32080#26696' '
    end
    object DBEdit2: TDBEdit
      Left = 57
      Top = 16
      Width = 69
      Height = 21
      Color = clScrollBar
      DataField = 'qing_gou_no'
      DataSource = DataSource2
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit4: TDBEdit
      Left = 393
      Top = 16
      Width = 85
      Height = 21
      Color = cl3DLight
      DataField = 'wu_name'
      DataSource = DataSource2
      Enabled = False
      PopupMenu = PopupMenu1
      TabOrder = 1
    end
    object DBEdit6: TDBEdit
      Left = 271
      Top = 50
      Width = 85
      Height = 21
      DataField = 'qing_shu_liang'
      DataSource = DataSource2
      TabOrder = 2
      OnExit = DBEdit6Exit
      OnKeyPress = DBEdit6KeyPress
    end
    object DBEdit11: TDBEdit
      Left = 519
      Top = 52
      Width = 248
      Height = 21
      DataField = 'bei_zhu'
      DataSource = DataSource2
      ImeName = 'FM-WuBi(HK)'
      TabOrder = 3
      OnExit = DBEdit11Exit
      OnKeyPress = DBEdit11KeyPress
    end
    object DBNavigator2: TDBNavigator
      Left = 349
      Top = 81
      Width = 210
      Height = 25
      DataSource = DataSource2
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbCancel, nbRefresh]
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
    end
    object DBEdit12: TDBEdit
      Left = 504
      Top = 16
      Width = 120
      Height = 21
      Color = cl3DLight
      DataField = 'wu_gui'
      DataSource = DataSource2
      Enabled = False
      TabOrder = 5
    end
    object MaskEdit1: TMaskEdit
      Left = 409
      Top = 50
      Width = 85
      Height = 21
      EditMask = '9999/99/99;1;_'
      MaxLength = 10
      TabOrder = 6
      Text = '    /  /  '
      OnExit = MaskEdit1Exit
      OnKeyPress = MaskEdit1KeyPress
    end
    object DBEdit3: TDBEdit
      Left = 36
      Top = 50
      Width = 53
      Height = 21
      Color = cl3DLight
      DataField = 'dan_wei'
      DataSource = DataSource2
      Enabled = False
      TabOrder = 7
    end
    object DBEdit7: TDBEdit
      Left = 57
      Top = 83
      Width = 178
      Height = 21
      DataField = 'need_why'
      DataSource = DataSource2
      TabOrder = 8
      OnExit = DBEdit7Exit
      OnKeyPress = DBEdit7KeyPress
    end
    object Edit1: TEdit
      Left = 134
      Top = 50
      Width = 85
      Height = 21
      Color = clScrollBar
      Enabled = False
      TabOrder = 9
      Text = 'Edit1'
    end
    object ComboBox1: TComboBox
      Left = 178
      Top = 16
      Width = 91
      Height = 21
      ItemHeight = 13
      TabOrder = 10
      Text = 'ComboBox1'
      OnExit = ComboBox1Exit
      OnKeyPress = ComboBox1KeyPress
    end
    object BitBtn3: TBitBtn
      Left = 560
      Top = 81
      Width = 35
      Height = 25
      TabOrder = 11
      OnClick = BitBtn3Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        555555555555555555555555555555555555555555FF55555555555559055555
        55555555577FF5555555555599905555555555557777F5555555555599905555
        555555557777FF5555555559999905555555555777777F555555559999990555
        5555557777777FF5555557990599905555555777757777F55555790555599055
        55557775555777FF5555555555599905555555555557777F5555555555559905
        555555555555777FF5555555555559905555555555555777FF55555555555579
        05555555555555777FF5555555555557905555555555555777FF555555555555
        5990555555555555577755555555555555555555555555555555}
      NumGlyphs = 2
    end
    object BitBtn4: TBitBtn
      Left = 632
      Top = 81
      Width = 35
      Height = 25
      TabOrder = 12
      OnClick = BitBtn4Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333FF33333333FF333993333333300033377F3333333777333993333333
        300033F77FFF3333377739999993333333333777777F3333333F399999933333
        33003777777333333377333993333333330033377F3333333377333993333333
        3333333773333333333F333333333333330033333333F33333773333333C3333
        330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
        993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
        333333333337733333FF3333333C333330003333333733333777333333333333
        3000333333333333377733333333333333333333333333333333}
      NumGlyphs = 2
    end
    object DBComboBox2: TDBComboBox
      Left = 677
      Top = 16
      Width = 94
      Height = 21
      DataField = 'wu_property'
      DataSource = DataSource2
      ItemHeight = 13
      Items.Strings = (
        #29983#29986#24120#20633#29289#26009
        #29983#29986#35336#21010#29992#26009
        #29983#29986#36628#21161#29992#26009
        #29983#29986#32173#20462#20445#39178
        #25613#32791#35036#21046#29289#26009
        #34892#25919#24120#20633#29289#26009
        #20491#20154#24037#20855#25991#20855
        #34892#25919#32173#20462#20445#39178
        #37096#38272#36039#29986#35373#20633)
      TabOrder = 13
      OnExit = DBComboBox2Exit
      OnKeyPress = DBComboBox2KeyPress
    end
    object dbedit15: TDBComboBox
      Left = 272
      Top = 82
      Width = 69
      Height = 21
      DataField = 'ifcmt'
      DataSource = DataSource2
      ItemHeight = 13
      Items.Strings = (
        #26159
        #21542)
      TabOrder = 14
      OnKeyPress = DBEdit15KeyPress
    end
  end
  object DBGrid1: TDBGrid
    Left = 9
    Top = 225
    Width = 776
    Height = 125
    Anchors = [akLeft, akTop, akRight]
    Color = clGradientActiveCaption
    DataSource = DataSource1
    PopupMenu = PopupMenu2
    ReadOnly = True
    TabOrder = 4
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'qing_gou_computerno'
        Title.Caption = #35531#36092#27969#27700#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'qing_gou_no'
        Title.Caption = #35531#36092#21934#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'qing_gou_bumen'
        Title.Caption = #35531#36092#37096#38272
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'qing_gou_date'
        Title.Caption = #35531#36092#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'qing_gou_ren'
        Title.Caption = #35531#36092#20154
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'yes_or_shen_he'
        Title.Caption = #23529#26680#29376#24907
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'shen_he_ren'
        Title.Caption = #23529#26680#20154
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'yes_or_no'
        Title.Caption = #25209#28310#29376#24907
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'pi_zhen_ren'
        Title.Caption = #25209#20934#20154
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'shu_dan_ren'
        Title.Caption = #36664#21934#20154
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'yes_or_re_chang'
        Title.Caption = #26159#21542#20837#24235
        Visible = True
      end>
  end