untmain.dfm

屏幕取词,一个简单的程序,希望对刚入门的朋友一点点帮助

object frmGanDict: TfrmGanDict
  Left = 564
  Top = 163
  Width = 280
  Height = 237
  Caption = 'Gan'#39's Free Dict'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object lblHwnd: TLabel
    Left = 8
    Top = 8
    Width = 76
    Height = 13
    Caption = 'Window Handle'
  end
  object lblMousePos: TLabel
    Left = 8
    Top = 152
    Width = 56
    Height = 13
    Caption = 'Mouse Pos:'
  end
  object lblFontWidth: TLabel
    Left = 8
    Top = 192
    Width = 52
    Height = 13
    Caption = 'Font Width'
  end
  object lblRect: TLabel
    Left = 8
    Top = 176
    Width = 23
    Height = 13
    Caption = 'Rect'
  end
  object btnLoad: TButton
    Left = 104
    Top = 112
    Width = 75
    Height = 25
    Caption = 'Load'
    TabOrder = 0
    OnClick = btnLoadClick
  end
  object btnUnLoad: TButton
    Left = 192
    Top = 112
    Width = 75
    Height = 25
    Caption = 'UnLoad'
    TabOrder = 1
    OnClick = btnUnLoadClick
  end
  object btnAbout: TButton
    Left = 192
    Top = 144
    Width = 75
    Height = 25
    Caption = 'About'
    TabOrder = 2
    OnClick = btnAboutClick
  end
  object memoThunk: TMemo
    Left = 8
    Top = 24
    Width = 257
    Height = 81
    TabOrder = 3
  end
end