object Form1: TForm1
Left = 192
Top = 103
Width = 544
Height = 375
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 88
Top = 48
Width = 209
Height = 177
end
object Label1: TLabel
Left = 112
Top = 40
Width = 32
Height = 13
Caption = 'Label1'
end
end
Left = 192
Top = 103
Width = 544
Height = 375
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 88
Top = 48
Width = 209
Height = 177
end
object Label1: TLabel
Left = 112
Top = 40
Width = 32
Height = 13
Caption = 'Label1'
end
end
我给发你一个透明组件包(带源码)深度历险居然上不去了,幸好偶经常及时从那里download :0