mainfrm.dfm

《Delphi 7经典问题解析》源代码 第一到七章 基础篇源程序 应用篇源程序

object frmMain: TfrmMain
  Left = 278
  Top = 175
  Width = 404
  Height = 230
  Caption = #25968#25454#26174#31034#32452#20214#20351#29992
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 396
    Height = 177
    Align = alTop
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 289
      Height = 175
      Align = alClient
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnDrawColumnCell = DBGrid1DrawColumnCell
    end
    object DBImage1: TDBImage
      Left = 290
      Top = 1
      Width = 105
      Height = 175
      Align = alRight
      DataField = 'BMP'
      DataSource = DataSource1
      Stretch = True
      TabOrder = 1
      OnDblClick = DBImage1DblClick
    end
  end
  object DBNavigator1: TDBNavigator
    Left = 0
    Top = 178
    Width = 396
    Height = 25
    DataSource = DataSource1
    Align = alBottom
    TabOrder = 1
  end
  object Table1: TTable
    Active = True
    AutoRefresh = True
    DatabaseName = 'DBDEMOS'
    TableName = 'animals.dbf'
    Left = 64
    Top = 24
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 128
    Top = 24
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Filter = 'Bitmaps (*.bmp)|*.bmp'
    Left = 192
    Top = 24
  end
end