GDI/图象编程

开发平台：

Delphi

UnitTxt.~dfm：源码内容

							object FormTxt: TFormTxt
  Left = 418
  Top = 183
  BorderStyle = bsNone
  Caption = #25991#23383#36755#20837#26694
  ClientHeight = 29
  ClientWidth = 697
  Color = clBlack
  TransparentColor = True
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = #40657#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 11
  object Edit1: TEdit
    Left = -2
    Top = -2
    Width = 1027
    Height = 35
    Color = clBlack
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -27
    Font.Name = #40657#20307
    Font.Pitch = fpVariable
    Font.Style = []
    ImeName = #20013#25991' - '#32043#20809#21326#23431#25340#38899#36755#20837#27861'V6'
    ParentFont = False
    TabOrder = 0
    OnKeyUp = Edit1KeyUp
  end
end

						