我有一个自定义控件,其中嵌入了一个 FlowLayoutPanel,我向其中添加了元素(其他自定义控件)。在 FlowLayoutPanel 的布局事件中,我将 FlowLayoutPanel 中的所有控件的大小调整为包含 FlowLayoutPanel 的大小。
在需要垂直滚动条 (AutoScroll = True) 之前一切正常,占用 FLpanel 内的空间,导致出现水平滚动条。
您看到的乱码是我在元素的构造函数中生成的一些随机占位符文本。
我想阻止这种情况:
我尝试向用户控件添加垂直滚动控件并在 Scroll 事件中执行 FlowLayoutPanel.VertScroll.Value=sender.value:它似乎有效,但移动滚动条控件时,实际的垂直和水平滚动条闪烁(出现和消失)很多。
我真的不知道是否有一些属性可以使滚动条在 FlowLayoutPanel 控件内容之外。
我在 VB.Net 中这样做,但 C# 答案很好(因为它基本上是相同的语法,至少在使用控件和 UI 时是这样)。
我忘了说我在 FlowLayoutPanel 中有 WrapContents=false 和 AutoScroll=true。
此外,如果您认为这种设计很眼熟:它是 Opera M2 邮件列表屏幕的像素完美副本。
在你的评论之后,我想到了这个:
Public Class FlowListPanel ' The user control
Private Sub Me_Load(sender As Object, e As EventArgs) Handles Me.Load
FL_Panel.AutoScroll = True ' FL_Panel is the FlowLayoutPanel
FL_Panel.WrapContents = False
FL_Panel.Dock = System.Windows.Forms.DockStyle.Fill
FL_Panel.FlowDirection = System.Windows.Forms.FlowDirection.TopDown
FL_Panel.Margin = New System.Windows.Forms.Padding(0)
End Sub
Sub AddItem(c As Control)
FL_Panel.Controls.Add(c)
ReorderControls()
End Sub
Private Sub FLP_CSC(sender As Object, e As EventArgs) Handles FL_Panel.ClientSizeChanged
ReorderControls()
End Sub
Sub ReorderControls()
For Each ctrl In FL_Panel.Controls
ctrl.Width = FL_Panel.ClientSize.Width
Next
End Sub
Private Sub FL_Panel_L(sender As Object, e As LayoutEventArgs) Handles FL_Panel.Layout
ReorderControls()
End Sub
End Class
好像是可以的,但是当到达垂直滚动条出现的临界点时,水平滚动条出现问题。
一旦添加了另一个项目,水平滚动条就会消失。
另外,我认为问题可能是 ReorderControls sub 没有被调用引起的,所以我做了一个按钮来调用它,但没有任何改变。
删除元素时不会出现此问题(但只会在添加时出现)。
当调整窗口大小时必须出现垂直滚动条时也会发生这种情况。
如下所示,添加新元素后它工作正常:
我听从了 Plutonix 的建议(修改代码 from his other answer ),因此我对 ReorderControls 子应用了一些修改,如下所示:
Sub ReorderControls()
Dim HScrollVis As Boolean = NativeMethods.IsHScrollVisible(FL_Panel)
If HScrollVis Then ' HScroll visible -> kill it with fire!
NativeMethods.ShowHideScrollBar(FL_Panel,
NativeMethods.SBOrientation.SB_HORZ,
False)
Return ' as it works anyway...
End If
For Each ctrl In FL_Panel.Controls
ctrl.Width = FL_Panel.ClientSize.Width
Next
End Sub
现在,当垂直滚动条出现时,水平滚动条会闪烁一次,而不是停留在那里。
我喜欢动图,所以这是目前的效果:
您可能看不到(由于 gif 的低帧率),水平条可能只有正在寻找它的人会注意到几分之一秒。
我认为问题已解决 80%,并将继续前进。如果我或其他人得出明确的结论,我会立即接受答案。
最佳答案
这是一种替代方法,可以为您提供所需的结果。当然,它不会直接回答您的问题,但在我看来,如果您需要扰乱控件的工作方式以获得所需的解决方案,那么您就没有使用正确的控件。
不是将您的控件直接添加到 FowLayoutPanel 中,
使用包含 TableLayoutPanel 的标准 Panel 对象。
将面板属性设置为...
AutoScroll=True
将 TableLayoutPanel 属性设置为
Dock = 顶部
Autosize = True , GrowAndSHrink
从 TableLayoutPanel 中的一个单元格开始......
现在将您的控件添加到 TableLayoutPanel...
例如
Dim CTRL As New Your_User_Control
TableLayoutPanel1.Controls.Add(CTRL)
CTRL.Dock = DockStyle.Top
当出现滚动条时,TableLAyoutPanel会水平收缩适当的量,所有包含的控件也会自动收缩。
关于c# - 如何防止垂直滚动条在控件中占用空间,导致水平滚动条?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/28418026/
我正在学习如何使用Nokogiri,根据这段代码我遇到了一些问题:require'rubygems'require'mechanize'post_agent=WWW::Mechanize.newpost_page=post_agent.get('http://www.vbulletin.org/forum/showthread.php?t=230708')puts"\nabsolutepathwithtbodygivesnil"putspost_page.parser.xpath('/html/body/div/div/div/div/div/table/tbody/tr/td/div
总的来说,我对ruby还比较陌生,我正在为我正在创建的对象编写一些rspec测试用例。许多测试用例都非常基础,我只是想确保正确填充和返回值。我想知道是否有办法使用循环结构来执行此操作。不必为我要测试的每个方法都设置一个assertEquals。例如:describeitem,"TestingtheItem"doit"willhaveanullvaluetostart"doitem=Item.new#HereIcoulddotheitem.name.shouldbe_nil#thenIcoulddoitem.category.shouldbe_nilendend但我想要一些方法来使用
关闭。这个问题是opinion-based.它目前不接受答案。想要改进这个问题?更新问题,以便editingthispost可以用事实和引用来回答它.关闭4年前。Improvethisquestion我想在固定时间创建一系列低音和高音调的哔哔声。例如:在150毫秒时发出高音调的蜂鸣声在151毫秒时发出低音调的蜂鸣声200毫秒时发出低音调的蜂鸣声250毫秒的高音调蜂鸣声有没有办法在Ruby或Python中做到这一点?我真的不在乎输出编码是什么(.wav、.mp3、.ogg等等),但我确实想创建一个输出文件。
给定这段代码defcreate@upgrades=User.update_all(["role=?","upgraded"],:id=>params[:upgrade])redirect_toadmin_upgrades_path,:notice=>"Successfullyupgradeduser."end我如何在该操作中实际验证它们是否已保存或未重定向到适当的页面和消息? 最佳答案 在Rails3中,update_all不返回任何有意义的信息,除了已更新的记录数(这可能取决于您的DBMS是否返回该信息)。http://ar.ru
我在我的项目目录中完成了compasscreate.和compassinitrails。几个问题:我已将我的.sass文件放在public/stylesheets中。这是放置它们的正确位置吗?当我运行compasswatch时,它不会自动编译这些.sass文件。我必须手动指定文件:compasswatchpublic/stylesheets/myfile.sass等。如何让它自动运行?文件ie.css、print.css和screen.css已放在stylesheets/compiled。如何在编译后不让它们重新出现的情况下删除它们?我自己编译的.sass文件编译成compiled/t
我正在寻找执行以下操作的正确语法(在Perl、Shell或Ruby中):#variabletoaccessthedatalinesappendedasafileEND_OF_SCRIPT_MARKERrawdatastartshereanditcontinues. 最佳答案 Perl用__DATA__做这个:#!/usr/bin/perlusestrict;usewarnings;while(){print;}__DATA__Texttoprintgoeshere 关于ruby-如何将脚
Rackup通过Rack的默认处理程序成功运行任何Rack应用程序。例如:classRackAppdefcall(environment)['200',{'Content-Type'=>'text/html'},["Helloworld"]]endendrunRackApp.new但是当最后一行更改为使用Rack的内置CGI处理程序时,rackup给出“NoMethodErrorat/undefinedmethod`call'fornil:NilClass”:Rack::Handler::CGI.runRackApp.newRack的其他内置处理程序也提出了同样的反对意见。例如Rack
在选择我想要运行操作的频率时,唯一的选项是“每天”、“每小时”和“每10分钟”。谢谢!我想为我的Rails3.1应用程序运行调度程序。 最佳答案 这不是一个优雅的解决方案,但您可以安排它每天运行,并在实际开始工作之前检查日期是否为当月的第一天。 关于ruby-如何每月在Heroku运行一次Scheduler插件?,我们在StackOverflow上找到一个类似的问题: https://stackoverflow.com/questions/8692687/
我有一个对象has_many应呈现为xml的子对象。这不是问题。我的问题是我创建了一个Hash包含此数据,就像解析器需要它一样。但是rails自动将整个文件包含在.........我需要摆脱type="array"和我该如何处理?我没有在文档中找到任何内容。 最佳答案 我遇到了同样的问题;这是我的XML:我在用这个:entries.to_xml将散列数据转换为XML,但这会将条目的数据包装到中所以我修改了:entries.to_xml(root:"Contacts")但这仍然将转换后的XML包装在“联系人”中,将我的XML代码修改为
我有一大串格式化数据(例如JSON),我想使用Psychinruby同时保留格式转储到YAML。基本上,我希望JSON使用literalstyle出现在YAML中:---json:|{"page":1,"results":["item","another"],"total_pages":0}但是,当我使用YAML.dump时,它不使用文字样式。我得到这样的东西:---json:!"{\n\"page\":1,\n\"results\":[\n\"item\",\"another\"\n],\n\"total_pages\":0\n}\n"我如何告诉Psych以想要的样式转储标量?解