order.~dfm

这也是师兄的毕业设计,具体的功能我也不清楚,因为我才大一,请见谅!!!!!!!不过是可以用来答辩的,完整的毕业设计,有源代码,可爱执行文件,文档资料.

      end
      object Label9: TLabel
        Left = 8
        Top = 88
        Width = 60
        Height = 13
        Caption = #23458#25143#32534#21495#65306
        FocusControl = DBEdit9
      end
      object Label10: TLabel
        Left = 160
        Top = 49
        Width = 60
        Height = 13
        Caption = #20135#21697#32534#21495#65306
      end
      object Label11: TLabel
        Left = 152
        Top = 88
        Width = 60
        Height = 13
        Caption = #35746#36141#25968#37327#65306
        FocusControl = DBEdit11
      end
      object Label12: TLabel
        Left = 288
        Top = 47
        Width = 36
        Height = 13
        Caption = #21333#20301#65306
        FocusControl = DBEdit12
      end
      object Label13: TLabel
        Left = 288
        Top = 86
        Width = 36
        Height = 13
        Caption = #20215#26684#65306
        FocusControl = DBEdit13
      end
      object Label14: TLabel
        Left = 408
        Top = 45
        Width = 60
        Height = 13
        Caption = #20132#20184#26085#26399#65306
        FocusControl = DBEdit14
      end
      object Label16: TLabel
        Left = 408
        Top = 87
        Width = 60
        Height = 13
        Caption = #35760#24405#24207#21495#65306
        FocusControl = DBEdit16
      end
      object SpeedButton1: TSpeedButton
        Left = 520
        Top = 63
        Width = 23
        Height = 22
        Enabled = False
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300130000031
          00333773F77777FF7733331000909000133333377737F777FF33330098F0F890
          0333337733F733F77F33370980FFF08907333373373F373373F33099FF0FFFF9
          903337F3F373F33FF7F33090FFF0FF00903337F73337F37737F33099FFF0FFF9
          9033373F33F7F3F33733370980F0F0890733337FF737F7337F33330098F0F890
          03333F77FF3733377FFF000009999900000377777FFFFF77777F088700000008
          77037F3377777773337F088887707888870373F3337773F33373307880707088
          7033373FF737F73FF733337003303300733333777337FF777333333333000333
          3333333333777333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = SpeedButton1Click
      end
      object Label17: TLabel
        Left = 551
        Top = 88
        Width = 48
        Height = 13
        Caption = #20135#21697#21517#31216
      end
      object DBEdit8: TDBEdit
        Left = 8
        Top = 64
        Width = 108
        Height = 21
        Color = clSilver
        DataField = 'Order_ID'
        DataSource = dm.d_list
        ReadOnly = True
        TabOrder = 0
      end
      object DBEdit9: TDBEdit
        Left = 8
        Top = 105
        Width = 108
        Height = 21
        Color = clSilver
        DataField = 'Client_ID'
        DataSource = dm.d_list
        ReadOnly = True
        TabOrder = 1
      end
      object DBEdit11: TDBEdit
        Left = 151
        Top = 102
        Width = 108
        Height = 21
        Color = clSilver
        DataField = 'Subscribe_Quantity'
        DataSource = dm.d_list
        ReadOnly = True
        TabOrder = 2
      end
      object DBEdit12: TDBEdit
        Left = 281
        Top = 64
        Width = 108
        Height = 21
        Color = clSilver
        DataField = 'Produce_Unit'
        DataSource = dm.d_list
        ReadOnly = True
        TabOrder = 3
      end
      object DBEdit13: TDBEdit
        Left = 280
        Top = 101
        Width = 108
        Height = 21
        Color = clSilver
        DataField = 'Produce_Price'
        DataSource = dm.d_list
        ReadOnly = True
        TabOrder = 4
      end
      object DBEdit14: TDBEdit
        Left = 411
        Top = 64
        Width = 108
        Height = 21
        Color = clSilver
        DataField = 'Delivery_Time'
        DataSource = dm.d_list
        ReadOnly = True
        TabOrder = 5
      end
      object DBEdit16: TDBEdit
        Left = 413
        Top = 102
        Width = 108
        Height = 21
        Color = clSilver
        DataField = 'Note_Code'
        DataSource = dm.d_list
        ReadOnly = True
        TabOrder = 6
      end
      object DBLookupComboBox1: TDBLookupComboBox
        Left = 551
        Top = 101
        Width = 145
        Height = 21
        Color = clSilver
        DataField = 'Produce_name'
        DataSource = dm.d_list
        KeyField = 'bom_name'
        ListField = 'bom_name'
        ListSource = dm.d_bom_name
        TabOrder = 7
      end
      object DBLookupComboBox3: TDBLookupComboBox
        Left = 152
        Top = 64
        Width = 121
        Height = 21
        Color = clSilver
        DataField = 'Produce_ID'
        DataSource = dm.d_list
        KeyField = 'BOM_ID'
        ListField = 'BOM_ID'
        ListSource = dm.d_bomm
        TabOrder = 8
      end
    end
    object Panel2: TPanel
      Left = 2
      Top = 180
      Width = 771
      Height = 133
      Align = alBottom
      BevelOuter = bvNone
      Color = 13619151
      TabOrder = 1
      object DBGrid2: TDBGrid
        Left = 0
        Top = 8
        Width = 771
        Height = 125
        Align = alBottom
        DataSource = dm.d_list
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'Order_ID'
            Title.Caption = #35746#21333#32534#21495
            Width = 92
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Client_ID'
            Title.Caption = #23458#25143#32534#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Produce_id'
            Title.Caption = #20135#21697#32534#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Subscribe_Quantity'
            Title.Caption = #35746#36141#25968#37327
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Produce_Unit'
            Title.Caption = #21333#20301
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Produce_Price'
            Title.Caption = #20215#26684
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Delivery_Time'
            Title.Caption = #20132#20184#26085#26399
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'produce_name'
            Title.Caption = #20135#21697#21517#31216
            Visible = True
          end>
      end
    end
  end
end