QBasic & Borland Pascal & C/Delphi5.iso/Delphi.5/Samples/sourceD5/browutil.exe/BROWSER/BROWSE.DFM/BROWSE.txt

Text File | 2000-01-02 | 3.7 KB | 154 lines

object FrmBrowser: TFrmBrowser
  Left = 99
  Top = 121
  Width = 460
  Height = 280
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  OldCreateOrder = True
  Position = poDefault
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDeactivate = FormDeactivate
  OnKeyUp = FormKeyUp
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar1: TStatusBar
    Left = 0
    Top = 234
    Width = 452
    Height = 19
    Panels = <>
    SimplePanel = True
  end
  object DBCustGrid1: TDBCustGrid
    Left = 0
    Top = 0
    Width = 452
    Height = 234
    Align = alClient
    DataSource = DataSource1
    Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    PopupMenu = PopupMenu1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnTitleClick = DBCustGrid1TitleClick
    RowsMark = 10
  end
  object DataSource1: TDataSource
    DataSet = Table1
    OnStateChange = DataSource1StateChange
    Left = 199
    Top = 122
  end
  object Table1: TTable
    AfterOpen = Table1AfterOpen
    AfterClose = Table1AfterClose
    BeforeInsert = Table1BeforeInsert
    AfterInsert = Table1AfterInsert
    AfterPost = Table1AfterPost
    AfterScroll = Table1AfterScroll
    Left = 257
    Top = 122
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 176
    Top = 64
    object View1: TMenuItem
      Caption = '&View'
      object HideColumn1: TMenuItem
        Caption = '&Hide Column'
        ShortCut = 16456
        OnClick = HideColumn1Click
      end
      object ShowAllColumns1: TMenuItem
        Caption = 'Show &All Columns'
        ShortCut = 16449
        OnClick = ShowAllColumns1Click
      end
      object DeleteViewProperties1: TMenuItem
        Caption = 'Delete &View Properties'
        OnClick = DeleteViewProperties1Click
      end
    end
    object Scatter1: TMenuItem
      Caption = 'Sc&atter'
      ShortCut = 16467
      OnClick = Scatter1Click
    end
    object Gather1: TMenuItem
      Caption = '&Gather'
      ShortCut = 16455
      OnClick = Gather1Click
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object MultipleScatter1: TMenuItem
      Caption = 'Multiple S&catter'
      OnClick = MultipleScatter1Click
    end
    object MultipleGather1: TMenuItem
      Caption = 'Multiple Ga&ther'
      OnClick = MultipleGather1Click
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object New1: TMenuItem
      Caption = '&New'
      OnClick = New1Click
    end
    object Insert1: TMenuItem
      Caption = '&Insert'
      OnClick = Insert1Click
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      OnClick = Edit1Click
    end
    object Delete1: TMenuItem
      Caption = '&Delete'
      OnClick = Delete1Click
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object Save1: TMenuItem
      Caption = '&Save'
      OnClick = Save1Click
    end
    object Revert1: TMenuItem
      Caption = '&Revert'
      OnClick = Revert1Click
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object Loadafile1: TMenuItem
      Caption = 'Load a file'
      OnClick = Loadafile1Click
    end
    object Savetofile1: TMenuItem
      Caption = 'Save to file'
      OnClick = Savetofile1Click
    end
  end
end