DOS/V Power Report 1996 August/VPR9608A.BIN/del20try/install/data.z/CUST.DFM/CUST.txt

Text File | 1996-05-08 | 3KB | 135 lines

object fmCustomers: TfmCustomers
  Left = 199
  Top = 159
  Width = 474
  Height = 333
  Caption = 'Customers'
  Font.Color = clBlack
  Font.Height = -15
  Font.Name = 'ｿｽlｿｽr ｿｽoｿｽSｿｽVｿｽbｿｽN'
  Font.Style = []
  Font.Charset = 128
  Menu = MainMenu1
  Position = poScreenCenter
  PixelsPerInch = 120
  TextHeight = 15
  object DBGrid1: TDBGrid
    Left = 0
    Top = 44
    Width = 466
    Height = 213
    Align = alClient
    Columns = <
      item
        FieldName = 'CustNo'
        Width = 60
      end
      item
        FieldName = 'Company'
        Width = 199
      end
      item
        FieldName = 'Addr1'
        Width = 168
      end
      item
        FieldName = 'City'
        Width = 85
      end
      item
        FieldName = 'State'
        Width = 66
      end
      item
        FieldName = 'Zip'
        Width = 60
      end
      item
        FieldName = 'Country'
        Width = 76
      end>
    DataSource = DM2.CustomerSource
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'ｿｽlｿｽr ｿｽoｿｽSｿｽVｿｽbｿｽN'
    Font.Style = []
    Font.Charset = 128
    ParentFont = False
    TabOrder = 0
    TitleFont.Color = clWindowText
    TitleFont.Height = -14
    TitleFont.Name = 'ｿｽlｿｽr ｿｽoｿｽSｿｽVｿｽbｿｽN'
    TitleFont.Style = []
    TitleFont.Charset = 128
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 466
    Height = 44
    Align = alTop
    BevelOuter = bvNone
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = 'ｿｽlｿｽr ｿｽoｿｽSｿｽVｿｽbｿｽN'
    Font.Style = []
    Font.Charset = 128
    ParentFont = False
    TabOrder = 1
    object DBNavigator1: TDBNavigator
      Left = 13
      Top = 9
      Width = 250
      Height = 27
      DataSource = DM2.CustomerSource
      TabOrder = 0
    end
    object BitBtn1: TBitBtn
      Left = 284
      Top = 9
      Width = 63
      Height = 27
      Caption = '&Find'
      TabOrder = 1
      OnClick = Button1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333FF33333333333330003FF3FFFFF3333777003000003333
        300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333
        330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000
        333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000
        339977FF777777773377000BFB03333333337773FF733333333F333000333333
        3300333777333333337733333333333333003333333333333377333333333333
        333333333333333333FF33333333333330003333333333333777333333333333
        3000333333333333377733333333333333333333333333333333}
      NumGlyphs = 2
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 257
    Width = 466
    Height = 20
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'ｿｽlｿｽr ｿｽoｿｽSｿｽVｿｽbｿｽN'
    Font.Style = []
    Font.Charset = 128
    Panels = <>
    ParentFont = False
    SimplePanel = False
  end
  object MainMenu1: TMainMenu
    Left = 340
    Top = 4
    object AboutItem: TMenuItem
      Caption = '&About'
      ShortCut = 0
      OnClick = AboutItemClick
    end
  end
end