Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/delphi/9.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Delphi VCL样式可能存在图形滚动条错误_Delphi_Delphi Xe2_Vcl Styles_Tpagecontrol - Fatal编程技术网

Delphi VCL样式可能存在图形滚动条错误

Delphi VCL样式可能存在图形滚动条错误,delphi,delphi-xe2,vcl-styles,tpagecontrol,Delphi,Delphi Xe2,Vcl Styles,Tpagecontrol,我在主窗体(图像中的form1)的中心有一个pagecontrol,我想打开停靠在pagecontrol中的其他窗体。因为我在我的子窗体上有很多控件,所以我需要垂直和水平滚动条(在子窗体上,我有活动滚动条选项活动),但这里有一个问题:当我使用VCL样式时,我的滚动条没有按应有的方式绘制,并且它们不可用。这是VCL风格的一种缺陷吗 TForm使用的滚动条()不支持Vcl样式(您必须向页面报告此情况),如果您想要修复此问题,您必须覆盖该控件并使用Vcl样式方法绘制滚动条,但这将需要大量工作,因为您可

我在主窗体(图像中的form1)的中心有一个pagecontrol,我想打开停靠在pagecontrol中的其他窗体。因为我在我的子窗体上有很多控件,所以我需要垂直和水平滚动条(在子窗体上,我有活动滚动条选项活动),但这里有一个问题:当我使用VCL样式时,我的滚动条没有按应有的方式绘制,并且它们不可用。这是VCL风格的一种缺陷吗


TForm使用的滚动条()不支持Vcl样式(您必须向页面报告此情况),如果您想要修复此问题,您必须覆盖该控件并使用Vcl样式方法绘制滚动条,但这将需要大量工作,因为您可以使用组件(在您的表单中)这一简单的解决方法它正确地支持vcl样式。

I新vcl样式中的滚动条存在一些错误。如果您还没有,您可能想查看,因为有很多关于vcl样式的信息,您可以提供一个基本代码来复制该问题吗?@RRUZ-问题的基本代码:在表单put的“OnCreate”中
AutoScroll:=False
垂直滚动条。范围:=高度*2滚动条仅显示“Windows”主题。因此,我将尝试用几句话解释:在我的主窗体上,我有一个按钮,可触发创建我的子窗体(我要停靠到页面控件中的那个窗体);这是我在TMainFormCreateButton上写的代码。单击:
如果未分配(Form2),则Form2:=TForm2.Create(应用程序)
Form2.ManualDock(第1页)
Form2.Show
如果我没有启用vcl样式,一切都很好,但是当vcl样式激活时,我的子窗体上的滚动条就不能正确绘制:(@Rodrigo:但是如果我使用你在博客中TWebBrowser项目中使用的方法,它可以工作吗?我会尝试一下,让你知道;)我想我找到了一种方法,不是很好,但确实有用。在子窗体上,我放置了一个TScrollBox,并将其设置为
s Align Property=AllClient;然后在我的TScrollBox中,我添加了我应该使用的所有组件;并且在运行时滚动工作;)