bom.dfm

C++Builder6下的一个生产管理系统

inherited fmBom: TfmBom
  Width = 770
  Height = 503
  Caption = #29289#26009#28165#21333'('#20135#21697#32467#26500')'#32500#25252
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited ToolBar1: TToolBar
    Width = 762
  end
  inherited CoolBar1: TCoolBar
    Width = 762
    Bands = <
      item
        Control = Panel1
        ImageIndex = -1
        MinHeight = 33
        Width = 758
      end>
    inherited Panel1: TPanel
      Width = 745
      inherited Label1: TLabel
        Left = 104
        Width = 52
        Caption = #29238#39033#32534#21495
      end
      inherited Label2: TLabel
        Left = 237
        Width = 52
        Caption = #29238#39033#21517#31216
      end
      inherited Label3: TLabel
        Left = 380
        Width = 52
        Caption = #29238#39033#25340#38899
      end
      inherited BitBtn1: TBitBtn
        OnClick = BitBtn1Click
      end
      inherited Edit1: TEdit
        OnKeyUp = Edit1KeyUp
      end
      inherited Edit2: TEdit
        OnKeyUp = Edit1KeyUp
      end
      inherited Edit3: TEdit
        Left = 432
        OnKeyUp = Edit1KeyUp
      end
    end
  end
  inherited DBGrid1: TDBGrid
    Height = 401
    Columns = <
      item
        Expanded = False
        FieldName = #29238#39033#32534#21495
        Width = 78
        Visible = True
      end
      item
        Expanded = False
        FieldName = #29289#26009#32534#21495
        Width = 69
        Visible = True
      end>
  end
  inherited Panel2: TPanel
    Width = 553
    Height = 401
    object Panel4: TPanel
      Left = 1
      Top = 1
      Width = 551
      Height = 184
      Align = alTop
      Alignment = taLeftJustify
      BevelOuter = bvNone
      TabOrder = 0
      object Label4: TLabel
        Left = 14
        Top = 6
        Width = 56
        Height = 13
        Caption = #29238#39033#32534#21495
        FocusControl = EditDBEdit
      end
      object Label5: TLabel
        Left = 14
        Top = 46
        Width = 56
        Height = 13
        Caption = #29289#26009#32534#21495
        FocusControl = EditDBEdit2
      end
      object Label6: TLabel
        Left = 14
        Top = 86
        Width = 56
        Height = 13
        Caption = #38656#35201#25968#37327
        FocusControl = EditDBEdit3
      end
      object Label7: TLabel
        Left = 99
        Top = 86
        Width = 56
        Height = 13
        Caption = #39046#26009#36710#38388
        FocusControl = EditDBEdit4
      end
      object Label8: TLabel
        Left = 184
        Top = 86
        Width = 56
        Height = 13
        Caption = #39046#26009#24211#25151
        FocusControl = EditDBEdit5
      end
      object Label10: TLabel
        Left = 269
        Top = 86
        Width = 42
        Height = 13
        Caption = #25439#32791#29575
        FocusControl = EditDBEdit7
      end
      object Label14: TLabel
        Left = 355
        Top = 86
        Width = 56
        Height = 13
        Caption = #23457#26680#26085#26399
        FocusControl = EditDBEdit9
      end
      object Label15: TLabel
        Left = 14
        Top = 132
        Width = 28
        Height = 13
        Caption = #22791#27880
        FocusControl = EditDBEdit10
      end
      object Label9: TLabel
        Left = 142
        Top = 6
        Width = 56
        Height = 13
        Caption = #29238#39033#21517#31216
      end
      object Label11: TLabel
        Left = 142
        Top = 46
        Width = 56
        Height = 13
        Caption = #29289#26009#21517#31216
      end
      object EditDBEdit: TDBEdit
        Left = 14
        Top = 21
        Width = 85
        Height = 21
        DataField = #29238#39033#32534#21495
        DataSource = DataSource1
        TabOrder = 0
        OnChange = EditDBEditChange
      end
      object EditDBEdit2: TDBEdit
        Left = 14
        Top = 61
        Width = 85
        Height = 21
        DataField = #29289#26009#32534#21495
        DataSource = DataSource1
        TabOrder = 1
        OnChange = EditDBEdit2Change
      end
      object EditDBEdit3: TDBEdit
        Left = 14
        Top = 101
        Width = 83
        Height = 21
        DataField = #38656#35201#25968#37327
        DataSource = DataSource1
        TabOrder = 2
      end
      object EditDBEdit4: TDBEdit
        Left = 99
        Top = 101
        Width = 83
        Height = 21
        DataField = #39046#26009#36710#38388
        DataSource = DataSource1
        TabOrder = 3
      end
      object EditDBEdit5: TDBEdit
        Left = 184
        Top = 101
        Width = 83
        Height = 21
        DataField = #39046#26009#24211#25151
        DataSource = DataSource1
        TabOrder = 4
      end
      object EditDBEdit7: TDBEdit
        Left = 269
        Top = 101
        Width = 83
        Height = 21
        DataField = #25439#32791#29575
        DataSource = DataSource1
        TabOrder = 5
      end
      object EditDBEdit9: TDBEdit
        Left = 355
        Top = 101
        Width = 86
        Height = 21
        DataField = #23457#26680#26085#26399
        DataSource = DataSource1
        TabOrder = 6
      end
      object EditDBEdit10: TDBEdit
        Left = 14
        Top = 147
        Width = 534
        Height = 21
        DataField = #20854#23427#20107#39033
        DataSource = DataSource1
        TabOrder = 7
      end
      object BitBtn2: TBitBtn
        Left = 104
        Top = 19
        Width = 25
        Height = 25
        TabOrder = 8
        OnClick = BitBtn2Click
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
          8888888888888888808888888888888800088888888888800088888888888800
          0888888800000000888888800BBB000888888800BBBBB0088888880BBBBBBB08
          8888880BBB0BBB088888880BB080BB0888888800BB0BB008888888800BBB0088
          8888888800000888888888888888888888888888888888888888}
      end
      object BitBtn3: TBitBtn
        Left = 104
        Top = 59
        Width = 25
        Height = 25
        TabOrder = 9
        OnClick = BitBtn3Click
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
          8888888888888888808888888888888800088888888888800088888888888800
          0888888800000000888888800BBB000888888800BBBBB0088888880BBBBBBB08
          8888880BBB0BBB088888880BB080BB0888888800BB0BB008888888800BBB0088
          8888888800000888888888888888888888888888888888888888}
      end
      object Edit4: TEdit
        Left = 142
        Top = 21
        Width = 299
        Height = 21
        TabOrder = 10
        Text = 'Edit4'
      end
      object Edit5: TEdit
        Left = 142
        Top = 61
        Width = 299
        Height = 21
        TabOrder = 11
        Text = 'Edit5'
      end
    end
    object GroupBox1: TGroupBox
      Left = 1
      Top = 185
      Width = 551
      Height = 215
      Align = alClient
      Caption = #20135#21697#29289#26009#28165#21333#32467#26500#27983#35272
      TabOrder = 1
      object Label12: TLabel
        Left = 14
        Top = 22
        Width = 56
        Height = 13
        Caption = #29238#39033#21517#31216
      end
      object Label13: TLabel
        Left = 14
        Top = 46
        Width = 56
        Height = 13
        Caption = #29289#26009#28165#21333
      end
      object DBGrid2: TDBGrid
        Left = 16
        Top = 64
        Width = 529
        Height = 145
        DataSource = DataSource4
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #26032#23435#20307
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = #29289#26009#32534#21495
            Width = 65
            Visible = True
          end
          item
            Expanded = False
            FieldName = #29289#26009#21517#31216
            Width = 109
            Visible = True
          end
          item
            Expanded = False
            FieldName = #35745#37327#21333#20301
            Width = 59
            Visible = True
          end
          item
            Expanded = False
            FieldName = #35268#26684#22411#21495
            Width = 62
            Visible = True
          end
          item
            Expanded = False
            FieldName = #38656#35201#25968#37327
            Visible = True
          end
          item
            Expanded = False
            FieldName = #25439#32791#29575
            Visible = True
          end
          item
            Expanded = False
            FieldName = #35745#21010#31867#21035
            Visible = True
          end
          item
            Expanded = False
            FieldName = #21697#29260
            Width = 34
            Visible = True
          end
          item
            Expanded = False
            FieldName = #39068#33394
            Width = 46
            Visible = True
          end
          item
            Expanded = False
            FieldName = #36827#36135#25552#21069#26399
            Title.Caption = #25552#21069#26399
            Width = 50
            Visible = True
          end
          item
            Expanded = False
            FieldName = #29983#20135#36710#38388
            Visible = True
          end
          item
            Expanded = False
            FieldName = #39046#26009#36710#38388
            Visible = True
          end>
      end
      object Edit6: TEdit
        Left = 78
        Top = 18
        Width = 299
        Height = 21
        TabOrder = 1
        Text = 'Edit6'
      end
    end
  end
  inherited Table1: TTable
    Active = True
    AfterScroll = Table1AfterScroll
    TableName = 'dbo.'#29289#26009#28165#21333
  end
  object Query2: TQuery
    DatabaseName = 'db'
    SQL.Strings = (
      
        'select a.*,b.'#38656#35201#25968#37327',b.'#25439#32791#29575',b.'#39046#26009#36710#38388' from '#29289#26009#20027#25991#20214' as a, '#29289#26009#28165#21333' as b where ' +
        'a.'#29289#26009#32534#21495'=b.'#29289#26009#32534#21495' '
      ' '#9'and b.'#29238#39033#32534#21495'=:Code')
    Left = 608
    Top = 280
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'Code'
        ParamType = ptUnknown
      end>
  end
  object DataSource4: TDataSource
    DataSet = Query2
    Left = 640
    Top = 280
  end
end