uselectpart.dfm

天涯進銷存系統

    Top = 37
    Width = 83
    Height = 18
    ParentColor = True
    TabOrder = 0
    OnChange = LBEdit1Change
    OnKeyDown = LBEdit1KeyDown
  end
  object LBEdit2: TLBEdit
    Left = 330
    Top = 37
    Width = 119
    Height = 18
    ParentColor = True
    TabOrder = 1
    OnChange = LBEdit1Change
    OnKeyDown = LBEdit2KeyDown
  end
  object LBEdit3: TLBEdit
    Left = 514
    Top = 37
    Width = 136
    Height = 18
    ParentColor = True
    TabOrder = 2
    OnChange = LBEdit1Change
    OnKeyDown = LBEdit2KeyDown
  end
  object Panel4: TPanel
    Left = 0
    Top = 30
    Width = 2
    Height = 403
    Align = alLeft
    BevelOuter = bvNone
    Color = 13003057
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
  end
  object Panel6: TPanel
    Left = 657
    Top = 30
    Width = 2
    Height = 403
    Align = alRight
    BevelOuter = bvNone
    Color = 13003057
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 4
  end
  object Panel3: TPanel
    Left = 0
    Top = 433
    Width = 659
    Height = 2
    Align = alBottom
    BevelOuter = bvNone
    Color = 13003057
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 5
  end
  object DataDBGrid: TLBDBGrid
    Left = 9
    Top = 86
    Width = 638
    Height = 322
    BorderStyle = bsNone
    DataSource = dmData.dsSelectPart
    GridlineColor = clBackground
    Options = [dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    ShowScrollBars = False
    SelectRowColor = 16774127
    SelectRowFontColor = clHighlight
    TabOrder = 6
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnDblClick = Action2Execute
    OnKeyDown = DataDBGridKeyDown
    Columns = <
      item
        Expanded = False
        FieldName = 'CODE'
        Width = 113
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NAME'
        Width = 172
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PRODUCING'
        Width = 63
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CARMODEL'
        Width = 72
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PARTTYPE'
        Width = 48
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'UNITS'
        Width = 31
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BILLQUANTITY'
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'STOCKQUANTITY'
        Width = 57
        Visible = True
      end>
  end
  object Panel2: TPanel
    Left = 9
    Top = 65
    Width = 639
    Height = 21
    BevelOuter = bvNone
    Color = 14581072
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    object Label17: TLabel
      Left = 3
      Top = 5
      Width = 48
      Height = 12
      Caption = #21830#21697#32534#21495
    end
    object Label21: TLabel
      Left = 115
      Top = 5
      Width = 48
      Height = 12
      Caption = #21517#31216#35268#26684
    end
    object Label5: TLabel
      Left = 288
      Top = 5
      Width = 24
      Height = 12
      Caption = #20135#22320
    end
    object Label6: TLabel
      Left = 351
      Top = 5
      Width = 24
      Height = 12
      Caption = #36710#22411
    end
    object Label7: TLabel
      Left = 565
      Top = 5
      Width = 48
      Height = 12
      Caption = #23454#38469#24211#23384
    end
    object Label4: TLabel
      Left = 504
      Top = 5
      Width = 48
      Height = 12
      Caption = #24320#31080#24211#23384
    end
    object Label9: TLabel
      Left = 472
      Top = 5
      Width = 24
      Height = 12
      Caption = #21333#20301
    end
    object Label10: TLabel
      Left = 424
      Top = 5
      Width = 24
      Height = 12
      Caption = #31867#21035
    end
  end
  object LBDBScrollBar1: TLBDBScrollBar
    Left = 631
    Top = 86
    Width = 18
    Height = 339
    Color = 16774127
    LineColor = clBackground
    DownFontColor = clBlack
    Font.Charset = SYMBOL_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Marlett'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 8
    DataSource = dmData.sdsSelectPart
  end
  object Panel1: TPanel
    Left = 9
    Top = 409
    Width = 621
    Height = 15
    BevelOuter = bvNone
    Color = 16251903
    TabOrder = 9
    Visible = False
    object Label16: TLabel
      Left = 2
      Top = 2
      Width = 60
      Height = 12
      Caption = #21442#32771#36827#20215#65306
    end
    object Label8: TLabel
      Left = 130
      Top = 2
      Width = 60
      Height = 12
      Caption = #24179#22343#36827#20215#65306
    end
    object Label18: TLabel
      Left = 274
      Top = 2
      Width = 60
      Height = 12
      Caption = #26368#36817#36827#20215#65306
    end
    object Label22: TLabel
      Left = 410
      Top = 2
      Width = 60
      Height = 12
      Caption = #26368#36817#21806#20215#65306
    end
    object DBText1: TDBText
      Left = 59
      Top = 2
      Width = 42
      Height = 12
      AutoSize = True
      DataField = 'INPUTPRICE'
      DataSource = dmData.dsSelectPart
    end
    object DBText2: TDBText
      Left = 187
      Top = 2
      Width = 42
      Height = 12
      AutoSize = True
      DataField = 'COSTPRICE'
      DataSource = dmData.dsSelectPart
    end
    object DBText3: TDBText
      Left = 331
      Top = 2
      Width = 42
      Height = 12
      AutoSize = True
      DataField = 'STOCKPRICE'
      DataSource = dmData.dsSelectPart
    end
    object DBText4: TDBText
      Left = 466
      Top = 2
      Width = 42
      Height = 12
      AutoSize = True
      DataField = 'SALEPRICE'
      DataSource = dmData.dsSelectPart
    end
  end
  object ActionList1: TActionList
    Images = frmMain.ToolbarImageList
    Left = 560
    Top = 240
    object Action1: TAction
      Caption = #21047#26032
      ImageIndex = 4
      OnExecute = Action1Execute
    end
    object Action2: TAction
      Caption = #36873#25321
      ImageIndex = 8
      OnExecute = Action2Execute
    end
  end
end