Chip 1997 April/Chip_1997-04_cd.bin/prezent/cb/data.z/EDPARTS.DFM/EDPARTS.txt

Text File | 1997-01-16 | 5.3 KB | 252 lines

object EdPartsForm: TEdPartsForm
  Left = 682
  Top = 125
  HelpContext = 6
  ActiveControl = DBEdit2
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Edit Parts'
  ClientHeight = 264
  ClientWidth = 313
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  PixelsPerInch = 96
  TextHeight = 13
  object TLabel
    Left = 8
    Top = 11
    Width = 33
    Height = 13
    Caption = 'PartNo'
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 313
    Height = 36
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object Bevel1: TBevel
      Left = 0
      Top = 34
      Width = 313
      Height = 2
      Align = alBottom
      Shape = bsTopLine
    end
    object PrintBtn: TSpeedButton
      Left = 270
      Top = 5
      Width = 25
      Height = 25
      Hint = 'Print form image'
      Glyph.Data = {
        2A010000424D2A010000000000007600000028000000130000000F0000000100
        0400000000000000000000000000000000000000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333F0EFF3300000000000003333F00FF37877777777777703330000030F8
        8888888888870333003330F9988888888887703F11EE37FFFFFFFFFFFFF77039
        0910330888888888888F703865F03330870000000078F03765F03333000FFFFF
        F000033865F03333330F44448033333765F033333330FFFFFF03333865F03333
        3330F4444803333765F0333333330FFFFFF0333865F033333333000000003336
        66C0333333333333333333300000}
      OnClick = PrintBtnClick
    end
    object Navigator: TDBNavigator
      Left = 16
      Top = 5
      Width = 240
      Height = 25
      HelpContext = 6
      DataSource = PartsSource1
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 36
    Width = 313
    Height = 193
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 11
      Width = 33
      Height = 13
      Caption = 'PartNo'
    end
    object Label2: TLabel
      Left = 8
      Top = 33
      Width = 53
      Height = 13
      Caption = 'Description'
    end
    object Label3: TLabel
      Left = 8
      Top = 55
      Width = 34
      Height = 13
      Caption = 'Vendor'
    end
    object Label4: TLabel
      Left = 8
      Top = 77
      Width = 43
      Height = 13
      Caption = 'On Hand'
    end
    object Label5: TLabel
      Left = 8
      Top = 100
      Width = 43
      Height = 13
      Caption = 'On Order'
    end
    object Label6: TLabel
      Left = 8
      Top = 122
      Width = 61
      Height = 13
      Caption = 'Backordered'
    end
    object Label7: TLabel
      Left = 8
      Top = 144
      Width = 21
      Height = 13
      Caption = 'Cost'
    end
    object Label8: TLabel
      Left = 8
      Top = 166
      Width = 43
      Height = 13
      Caption = 'List Price'
    end
    object DBEdPartNo: TDBEdit
      Left = 80
      Top = 6
      Width = 102
      Height = 21
      HelpContext = 6
      DataField = 'PartNo'
      DataSource = PartsSource1
      MaxLength = 0
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 80
      Top = 29
      Width = 225
      Height = 21
      HelpContext = 6
      DataField = 'Description'
      DataSource = PartsSource1
      MaxLength = 30
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 80
      Top = 119
      Width = 45
      Height = 21
      HelpContext = 6
      DataField = 'BackOrd'
      DataSource = PartsSource1
      MaxLength = 0
      TabOrder = 5
    end
    object DBEdit4: TDBEdit
      Left = 80
      Top = 74
      Width = 82
      Height = 21
      HelpContext = 6
      DataField = 'OnHand'
      DataSource = PartsSource1
      MaxLength = 0
      TabOrder = 4
    end
    object DBEdit5: TDBEdit
      Left = 80
      Top = 97
      Width = 82
      Height = 21
      HelpContext = 6
      DataField = 'OnOrder'
      DataSource = PartsSource1
      MaxLength = 0
      TabOrder = 3
    end
    object DataComboBox1: TDBLookupComboBox
      Left = 80
      Top = 51
      Width = 225
      Height = 21
      DataField = 'VendorNo'
      DataSource = PartsSource1
      KeyField = 'VendorNo'
      ListField = 'VendorName'
      ListSource = MastData.VendorSource
      TabOrder = 2
    end
    object DBEdit8: TDBEdit
      Left = 80
      Top = 163
      Width = 102
      Height = 21
      DataField = 'ListPrice'
      DataSource = PartsSource1
      MaxLength = 0
      TabOrder = 7
    end
    object DBEdit7: TDBEdit
      Left = 80
      Top = 141
      Width = 102
      Height = 21
      HelpContext = 6
      DataField = 'Cost'
      DataSource = PartsSource1
      MaxLength = 0
      TabOrder = 6
    end
  end
  object OKButton: TButton
    Left = 147
    Top = 235
    Width = 75
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 2
  end
  object CancelButton: TButton
    Left = 232
    Top = 235
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 3
  end
  object PartsSource1: TDataSource
    DataSet = MastData.Parts
    Left = 32
    Top = 232
  end
end