unit_bmp.dfm

一系列DELPHI的控件如何使用的例子,例子有的比较简单,但是能详细的说明了控件的使用,对许多刚涉足DELPHI的朋友会很有帮助的

object Form1: TForm1
  Left = 192
  Top = 107
  Width = 466
  Height = 341
  Caption = #20351#29992'QUERY'#25511#20214#30340'BMP'#22270#24418#30340#25968#25454#24211#23384#21462
  Color = clBtnFace
  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 PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 458
    Height = 314
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 0
    OnChange = PageControl1Change
    object TabSheet1: TTabSheet
      Caption = #23384#20648
      object Panel1: TPanel
        Left = 8
        Top = 16
        Width = 249
        Height = 241
        Caption = 'Panel1'
        TabOrder = 0
        object Image1: TImage
          Left = 1
          Top = 1
          Width = 247
          Height = 239
          Align = alClient
          Stretch = True
        end
      end
      object BitBtn1: TBitBtn
        Left = 317
        Top = 136
        Width = 75
        Height = 25
        Caption = #35835#21462'BMP'
        TabOrder = 1
        OnClick = BitBtn1Click
      end
      object BitBtn2: TBitBtn
        Left = 317
        Top = 176
        Width = 75
        Height = 25
        Caption = #23384#20648'BMP'
        TabOrder = 2
        OnClick = BitBtn2Click
      end
      object BitBtn3: TBitBtn
        Left = 317
        Top = 218
        Width = 75
        Height = 25
        Caption = #36864'    '#20986
        TabOrder = 3
        OnClick = BitBtn3Click
      end
      object Edit1: TEdit
        Left = 288
        Top = 32
        Width = 137
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 4
      end
    end
    object TabSheet2: TTabSheet
      Caption = #26174#31034
      ImageIndex = 1
      object Panel2: TPanel
        Left = 8
        Top = 16
        Width = 249
        Height = 241
        Caption = 'Panel1'
        TabOrder = 0
        object Image2: TImage
          Left = 1
          Top = 1
          Width = 247
          Height = 239
          Align = alClient
          Stretch = True
        end
      end
      object BitBtn4: TBitBtn
        Left = 285
        Top = 40
        Width = 75
        Height = 25
        Caption = 'first'
        TabOrder = 1
        OnClick = BitBtn4Click
      end
      object BitBtn5: TBitBtn
        Left = 285
        Top = 104
        Width = 75
        Height = 25
        Caption = 'next'
        TabOrder = 2
        OnClick = BitBtn5Click
      end
      object BitBtn6: TBitBtn
        Left = 285
        Top = 162
        Width = 75
        Height = 25
        Caption = 'priot'
        TabOrder = 3
        OnClick = BitBtn6Click
      end
      object BitBtn7: TBitBtn
        Left = 285
        Top = 218
        Width = 75
        Height = 25
        Caption = 'last'
        TabOrder = 4
        OnClick = BitBtn7Click
      end
    end
  end
  object Query1: TQuery
    DatabaseName = 'BMPDEMO'
    SQL.Strings = (
      'SELECT * FROM bmp')
    Left = 8
    Top = 8
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Left = 42
    Top = 8
  end
  object Query2: TQuery
    DatabaseName = 'BMPDEMO'
    SQL.Strings = (
      'select * from bmp'
      '')
    Left = 120
    Top = 8
    object Query2A2: TBlobField
      FieldName = 'A2'
      Origin = 'DEMO1.bmp.A2'
      Size = 1
    end
  end
end