local1.dfm

来自「Delphi6分布式开发例程8 )」· DFM 代码 · 共 87 行

object Form1: TForm1
  Left = 192
  Top = 116
  Width = 696
  Height = 480
  Caption = 'LocalDB'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  WindowState = wsMaximized
  PixelsPerInch = 120
  TextHeight = 16
  object DBGrid1: TDBGrid
    Left = 0
    Top = 184
    Width = 688
    Height = 250
    Align = alBottom
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object DBNavigator1: TDBNavigator
    Left = 0
    Top = 0
    Width = 688
    Height = 25
    DataSource = DataSource1
    Align = alTop
    TabOrder = 1
  end
  object ListBox1: TListBox
    Left = 0
    Top = 25
    Width = 688
    Height = 159
    Align = alClient
    ItemHeight = 16
    TabOrder = 2
    OnClick = ListBox1Click
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 40
    Top = 272
  end
  object Table1: TTable
    DatabaseName = 'temp'
    Left = 88
    Top = 272
  end
  object MainMenu1: TMainMenu
    Left = 32
    Top = 80
    object Options1: TMenuItem
      Caption = '&Options'
      object ShowTableName1: TMenuItem
        Caption = '&ShowTableName:'
        OnClick = ShowTableName1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = '&Exit'
        OnClick = Exit1Click
      end
    end
  end
  object Database1: TDatabase
    AliasName = 'DBDEMOS'
    DatabaseName = 'temp'
    SessionName = 'Default'
    Left = 136
    Top = 272
  end
end