unit1.dfm

用Delphi实现的类似XP的简单的自定义FORM窗体,可以替换为自己的风格,或把它封装为基础类来使用,这里只是提供一种设计思路

inherited Base_frm222: TBase_frm222
  Left = 238
  Top = 180
  Caption = 'Base_frm222'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton [3]
    Left = 136
    Top = 112
    Width = 177
    Height = 33
    Caption = #20877#24314#19968#20010
    Flat = True
    OnClick = SpeedButton1Click
  end
end