unit1.dfm

Delphi的简单案例

object Form1: TForm1
  Left = 162
  Top = 105
  Width = 628
  Height = 417
  Cursor = crHandPoint
  Caption = 'Form1'
  Color = clSilver
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 168
    Top = 0
    Width = 343
    Height = 48
    Alignment = taCenter
    Caption = #22270#24418#25968#25454#24211#23454#20363
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -48
    Font.Name = #38582#20070
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Image1: TImage
    Left = 504
    Top = 64
    Width = 113
    Height = 169
  end
  object DBGrid1: TDBGrid
    Left = 9
    Top = 56
    Width = 200
    Height = 233
    DataSource = DataSource1
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object BitBtn1: TBitBtn
    Left = 9
    Top = 327
    Width = 144
    Height = 34
    Cursor = crHandPoint
    Caption = #20462#25913#22270#29255
    TabOrder = 1
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
      333333333337FF3333333333330003333333333333777F333333333333080333
      3333333F33777FF33F3333B33B000B33B3333373F777773F7333333BBB0B0BBB
      33333337737F7F77F333333BBB0F0BBB33333337337373F73F3333BBB0F7F0BB
      B333337F3737F73F7F3333BB0FB7BF0BB3333F737F37F37F73FFBBBB0BF7FB0B
      BBB3773F7F37337F377333BB0FBFBF0BB333337F73F333737F3333BBB0FBF0BB
      B3333373F73FF7337333333BBB000BBB33333337FF777337F333333BBBBBBBBB
      3333333773FF3F773F3333B33BBBBB33B33333733773773373333333333B3333
      333333333337F33333333333333B333333333333333733333333}
    NumGlyphs = 2
  end
  object DBNavigator1: TDBNavigator
    Left = 9
    Top = 299
    Width = 600
    Height = 21
    DataSource = DataSource1
    TabOrder = 2
  end
  object Panel1: TPanel
    Left = 216
    Top = 56
    Width = 281
    Height = 233
    BevelInner = bvLowered
    BevelWidth = 2
    Caption = 'Panel1'
    Color = clBlack
    TabOrder = 3
    object DBImage2: TDBImage
      Left = 4
      Top = 4
      Width = 273
      Height = 225
      Cursor = crHandPoint
      Align = alClient
      DataField = 'Bmp'
      DataSource = DataSource1
      Stretch = True
      TabOrder = 1
      Visible = False
      OnClick = DBImage2Click
    end
    object DBImage1: TDBImage
      Left = 24
      Top = 48
      Width = 209
      Height = 137
      Cursor = crHandPoint
      DataField = 'Bmp'
      DataSource = DataSource1
      TabOrder = 0
      OnClick = DBImage1Click
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 372
    Width = 620
    Height = 18
    Panels = <>
  end
  object BitBtn2: TBitBtn
    Left = 368
    Top = 328
    Width = 121
    Height = 33
    Cursor = crHandPoint
    Caption = 'QR'#25253#34920#39044#35272
    TabOrder = 5
    OnClick = BitBtn2Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555550555
      555555555555F55555555505555B0555570555F55557F55555F55B50555B0555
      7B55575F5557F555575555B5055B5557B5555575F55755557555555B5550005B
      55555557555FFF575555555555BBB0055555555555777FF5555555555BBBBB00
      55555555577777FF55555000BBBBBBB050005FFF7777777F5FFFBBB5BBBBBBB0
      BBB577757777777F77755555BBBBBBB55555555577777775555555555BBBBB55
      55555555577777555555555705BBB55505555555F5777555F555557B5555055B
      505555575555F5575F5557B5555B0555B50555755557F55575F55B55555B0555
      5B5557555557F55557555555555B555555555555555755555555}
    NumGlyphs = 2
  end
  object BitBtn3: TBitBtn
    Left = 488
    Top = 328
    Width = 121
    Height = 33
    Cursor = crHandPoint
    Caption = 'QR'#25253#34920#25171#21360
    TabOrder = 6
    OnClick = BitBtn3Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
      8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
      8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
      8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
  end
  object BitBtn4: TBitBtn
    Left = 184
    Top = 328
    Width = 129
    Height = 33
    Cursor = crHandPoint
    Caption = 'RAVE'#25253#34920#39044#35272
    ModalResult = 5
    TabOrder = 7
    OnClick = BitBtn4Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00344446333334
      44433333FFFF333333FFFF33000033AAA43333332A4333338833F33333883F33
      00003332A46333332A4333333383F33333383F3300003332A2433336A6633333
      33833F333383F33300003333AA463362A433333333383F333833F33300003333
      6AA4462A46333333333833FF833F33330000333332AA22246333333333338333
      33F3333300003333336AAA22646333333333383333F8FF33000033444466AA43
      6A43333338FFF8833F383F330000336AA246A2436A43333338833F833F383F33
      000033336A24AA442A433333333833F33FF83F330000333333A2AA2AA4333333
      333383333333F3330000333333322AAA4333333333333833333F333300003333
      333322A4333333333333338333F333330000333333344A433333333333333338
      3F333333000033333336A24333333333333333833F333333000033333336AA43
      33333333333333833F3333330000333333336663333333333333333888333333
      0000}
    NumGlyphs = 2
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 64
    Top = 80
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Left = 400
    Top = 248
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'stu'
    TableName = 'PPP.DB'
    Left = 64
    Top = 32
  end
  object RvDataSetConnection1: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = Table1
    Left = 104
    Top = 32
  end
  object RvProject1: TRvProject
    ProjectFile = 'Project1.rav'
    Left = 184
    Top = 24
  end
end