unit1.dfm

精彩编程百例51～75 其中有 cpu速度测试 检测声卡 查询内存信息 图像处理技巧 模拟放大镜效果等待

object Form1: TForm1
  Left = 244
  Top = 129
  AlphaBlend = True
  BorderStyle = bsNone
  Caption = #22270#20687#38236#20687#25928#26524
  ClientHeight = 376
  ClientWidth = 574
  Color = clInfoBk
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 335
    Width = 574
    Height = 41
    Align = alBottom
    BevelInner = bvLowered
    BorderStyle = bsSingle
    Color = clInactiveCaption
    TabOrder = 0
    object shui: TBitBtn
      Left = 104
      Top = 7
      Width = 75
      Height = 25
      Caption = #27700#24179#38236#20687
      TabOrder = 0
      OnClick = shuiClick
    end
    object yuan: TBitBtn
      Left = 392
      Top = 7
      Width = 75
      Height = 25
      Caption = #26174#31034#21407#22270
      TabOrder = 1
      OnClick = yuanClick
    end
    object new: TBitBtn
      Left = 8
      Top = 7
      Width = 75
      Height = 25
      Caption = #25171#24320#26032#22270
      TabOrder = 2
      OnClick = newClick
      NumGlyphs = 2
    end
    object exit: TBitBtn
      Left = 488
      Top = 7
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 3
      OnClick = exitClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033BBBBBBBBBB
        BB33337777777777777F33BB00BBBBBBBB33337F77333333F37F33BB0BBBBBB0
        BB33337F73F33337FF7F33BBB0BBBB000B33337F37FF3377737F33BBB00BB00B
        BB33337F377F3773337F33BBBB0B00BBBB33337F337F7733337F33BBBB000BBB
        BB33337F33777F33337F33EEEE000EEEEE33337F3F777FFF337F33EE0E80000E
        EE33337F73F77773337F33EEE0800EEEEE33337F37377F33337F33EEEE000EEE
        EE33337F33777F33337F33EEEEE00EEEEE33337F33377FF3337F33EEEEEE00EE
        EE33337F333377F3337F33EEEEEE00EEEE33337F33337733337F33EEEEEEEEEE
        EE33337FFFFFFFFFFF7F33EEEEEEEEEEEE333377777777777773}
      NumGlyphs = 2
    end
    object chui: TBitBtn
      Left = 200
      Top = 7
      Width = 75
      Height = 25
      Caption = #22402#30452#38236#20687
      TabOrder = 4
      OnClick = chuiClick
    end
    object bian: TBitBtn
      Left = 296
      Top = 7
      Width = 75
      Height = 25
      Caption = #35282#24230#38236#20687
      TabOrder = 5
      OnClick = bianClick
    end
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Filter = 'Bitmaps (*.bmp)|*.bmp'
    FilterIndex = 2
    OptionsEx = [ofExNoPlacesBar]
    Left = 72
    Top = 64
  end
end