没有的
不过可以做的。我可以在编辑环境下,在button 上放其他对象
方法是:
1。在窗体上点击右键,选择‘view as text’
你会看见如下(我在窗体上放了两个button):
object Form1: TForm1
Left = 192
Top = 108
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 Button1: TButton
Left = 86
Top = 68
Width = 239
Height = 125
Caption = 'Button1'
TabOrder = 0
end
object Button2: TButton
Left = 5
Top = 84
Width = 37
Height = 33
Caption = 'Button2'
TabOrder = 1
end
end改成:
object Form1: TForm1
Left = 137
Top = 100
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 Button1: TButton
Left = 84
Top = 66
Width = 403
Height = 125
Caption = 'Button1'
TabOrder = 0
object Button2: TButton
Left = 6
Top = 6
Width = 37
Height = 33
Caption = 'Button2'
TabOrder = 0
end
end
end
然后右键选‘view as from’
看看
不过可以做的。我可以在编辑环境下,在button 上放其他对象
方法是:
1。在窗体上点击右键,选择‘view as text’
你会看见如下(我在窗体上放了两个button):
object Form1: TForm1
Left = 192
Top = 108
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 Button1: TButton
Left = 86
Top = 68
Width = 239
Height = 125
Caption = 'Button1'
TabOrder = 0
end
object Button2: TButton
Left = 5
Top = 84
Width = 37
Height = 33
Caption = 'Button2'
TabOrder = 1
end
end改成:
object Form1: TForm1
Left = 137
Top = 100
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 Button1: TButton
Left = 84
Top = 66
Width = 403
Height = 125
Caption = 'Button1'
TabOrder = 0
object Button2: TButton
Left = 6
Top = 6
Width = 37
Height = 33
Caption = 'Button2'
TabOrder = 0
end
end
end
然后右键选‘view as from’
看看
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货