t Delphi 10.3中的OLBAR波段大小调整问题
我将t Delphi 10.3中的OLBAR波段大小调整问题,delphi,vcl,Delphi,Vcl,我将TCoolBar组件放入delphi10.3中的一个全新项目中。有一些乐队排成一排。当我调整一个标注栏的大小时,同一行中其右侧的其他标注栏也会调整大小。我可以减小或增大波段大小,右边的其他波段总是根据差值增大。如果我调整窗体的大小,所有的乐队都会疯狂。它们都增大了尺寸 如果使用标注栏编辑器创建标注栏,则不会发生错误。当我将一些战术工具栏下拉到t工具栏中时,就会出现这种情况 未设置CoolBar自动调整大小。bands或TActionToolBar没有这样的属性 pas文件: unit Uni
TCoolBar
组件放入delphi10.3
中的一个全新项目中。有一些乐队排成一排。当我调整一个标注栏的大小时,同一行中其右侧的其他标注栏也会调整大小。我可以减小或增大波段大小,右边的其他波段总是根据差值增大。如果我调整窗体的大小,所有的乐队都会疯狂。它们都增大了尺寸
如果使用标注栏编辑器创建标注栏,则不会发生错误。当我将一些战术工具栏
下拉到t工具栏
中时,就会出现这种情况
未设置CoolBar自动调整大小。bands或TActionToolBar没有这样的属性
pas文件:
unit Unit2;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ToolWin, Vcl.ComCtrls,
Vcl.PlatformDefaultStyleActnCtrls, System.Actions, Vcl.ActnList, Vcl.ActnMan,
Vcl.ActnCtrls;
type
TForm2 = class(TForm)
ActionManager1: TActionManager;
CoolBar1: TCoolBar;
ActionToolBar1: TActionToolBar;
ActionToolBar2: TActionToolBar;
ActionToolBar3: TActionToolBar;
ActionToolBar4: TActionToolBar;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
{$R *.dfm}
end.
dpr文件:
object Form2: TForm2
Left = 0
Top = 0
Caption = 'Form2'
ClientHeight = 405
ClientWidth = 635
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object CoolBar1: TCoolBar
Left = 0
Top = 0
Width = 635
Height = 65
Bands = <
item
Control = ActionToolBar1
ImageIndex = -1
Width = 148
end
item
Break = False
Control = ActionToolBar2
ImageIndex = -1
Width = 477
end
item
Control = ActionToolBar3
ImageIndex = -1
Width = 146
end
item
Break = False
Control = ActionToolBar4
ImageIndex = -1
Width = 479
end>
FixedSize = True
object ActionToolBar1: TActionToolBar
Left = 11
Top = 0
Width = 135
Height = 25
Caption = 'ActionToolBar1'
Color = clMenuBar
ColorMap.DisabledFontColor = 7171437
ColorMap.HighlightColor = clWhite
ColorMap.BtnSelectedFont = clBlack
ColorMap.UnusedColor = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Spacing = 0
end
object ActionToolBar2: TActionToolBar
Left = 163
Top = 0
Width = 468
Height = 25
Caption = 'ActionToolBar2'
Color = clMenuBar
ColorMap.DisabledFontColor = 7171437
ColorMap.HighlightColor = clWhite
ColorMap.BtnSelectedFont = clBlack
ColorMap.UnusedColor = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Spacing = 0
end
object ActionToolBar3: TActionToolBar
Left = 11
Top = 27
Width = 133
Height = 25
Caption = 'ActionToolBar3'
Color = clMenuBar
ColorMap.DisabledFontColor = 7171437
ColorMap.HighlightColor = clWhite
ColorMap.BtnSelectedFont = clBlack
ColorMap.UnusedColor = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Spacing = 0
end
object ActionToolBar4: TActionToolBar
Left = 161
Top = 27
Width = 470
Height = 25
Caption = 'ActionToolBar4'
Color = clMenuBar
ColorMap.DisabledFontColor = 7171437
ColorMap.HighlightColor = clWhite
ColorMap.BtnSelectedFont = clBlack
ColorMap.UnusedColor = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Spacing = 0
end
end
object ActionManager1: TActionManager
Left = 248
Top = 160
StyleName = 'Platform Default'
end
end
对象格式2:TForm2
左=0
Top=0
标题='Form2'
ClientHeight=405
ClientWidth=635
颜色=clBtnFace
Font.Charset=默认字符集
Font.Color=clWindowText
字体高度=-11
Font.Name='Tahoma'
Font.Style=[]
OldCreateOrder=False
OnCreate=FormCreate
PixelsPerInch=96
text高度=13
对象CoolBar1:tColbar
左=0
Top=0
宽度=635
高度=65
波段=<
项目
控件=操作工具栏1
ImageIndex=-1
宽度=148
结束
项目
中断=错误
控件=操作工具栏2
ImageIndex=-1
宽度=477
结束
项目
控件=操作工具栏3
ImageIndex=-1
宽度=146
结束
项目
中断=错误
控件=操作工具栏4
ImageIndex=-1
宽度=479
结束>
FixedSize=True
对象操作工具栏1:TActionToolBar
左=11
Top=0
宽度=135
高度=25
标题='ActionToolBar1'
颜色=clMenuBar
ColorMap.DisabledFontColor=7171437
ColorMap.HighlightColor=clWhite
ColorMap.btSelectedFont=clBlack
ColorMap.UnusedColor=clWhite
Font.Charset=默认字符集
Font.Color=clBlack
字体高度=-11
Font.Name='Tahoma'
Font.Style=[]
ParentFont=False
间距=0
结束
对象操作工具栏2:TActionToolBar
左=163
Top=0
宽度=468
高度=25
标题='ActionToolBar2'
颜色=clMenuBar
ColorMap.DisabledFontColor=7171437
ColorMap.HighlightColor=clWhite
ColorMap.btSelectedFont=clBlack
ColorMap.UnusedColor=clWhite
Font.Charset=默认字符集
Font.Color=clBlack
字体高度=-11
Font.Name='Tahoma'
Font.Style=[]
ParentFont=False
间距=0
结束
对象操作工具栏3:TActionToolBar
左=11
Top=27
宽度=133
高度=25
标题='ActionToolBar3'
颜色=clMenuBar
ColorMap.DisabledFontColor=7171437
ColorMap.HighlightColor=clWhite
ColorMap.btSelectedFont=clBlack
ColorMap.UnusedColor=clWhite
Font.Charset=默认字符集
Font.Color=clBlack
字体高度=-11
Font.Name='Tahoma'
Font.Style=[]
ParentFont=False
间距=0
结束
对象操作工具栏4:TActionToolBar
左=161
Top=27
宽度=470
高度=25
标题='ActionToolBar4'
颜色=clMenuBar
ColorMap.DisabledFontColor=7171437
ColorMap.HighlightColor=clWhite
ColorMap.btSelectedFont=clBlack
ColorMap.UnusedColor=clWhite
Font.Charset=默认字符集
Font.Color=clBlack
字体高度=-11
Font.Name='Tahoma'
Font.Style=[]
ParentFont=False
间距=0
结束
结束
对象ActionManager 1:TActionManager
左=248
Top=160
StyleName='平台默认值'
结束
结束
这个问题有什么解决办法吗