等娘娘烘焙 發表於 2020-6-11 16:45:00

Delphi 滚动条组件 TScrollBar 介绍

<p><span style="font-size: 16px"><strong>Delphi 滚动条组件 TScrollBar 介绍</strong></span></p>
<p><span style="font-size: 16px">滚动条组件(TScrollBar)此组件是一个Windows滚动条,用于滚动窗口、组件内容。许多控制有滚动条属性,它们把滚动条作为自己的一部分,对于没有完整滚动条的控制,TScrollBar组件提供了一个附加的功能,运用它可以使某些控制的内容易于操作。&nbsp;</span><br data-filtered="filtered"><br data-filtered="filtered"><span style="font-size: 16px"><strong>1、用法</strong></span><br data-filtered="filtered"><span style="font-size: 16px">一般情况下,滚动条是自动加入的,例如前面讲的列表框,当项目不能完全显示时,列表框将自动加上滚动条。当用户操作滚动条时,列表自动滚动。</span><br data-filtered="filtered"><span style="font-size: 16px">如果想自己操纵窗口滚动,就要用到TScrollBar组件,当用户在滚动条上操作时,将触发OnScroll事件,这样就可以操纵怎样滚动了。</span><br data-filtered="filtered"><span style="font-size: 16px">在通常情况下,用户只利用OnScroll事件,并在代码中引用Position属性,获取TScrollBar组件中小方块的位置,然后利用此值进行操作,例如设置文字的字号大小、颜色的取值等。&nbsp;</span><br data-filtered="filtered"><br data-filtered="filtered"><span style="font-size: 16px"><strong>2、属性&nbsp;</strong></span></p>
<ul>
<li><span style="font-size: 16px">Kind&nbsp; //此属性用于设置滚动条是水平方向的还是垂直方向的&nbsp;</span>
<ul>
<li><span style="font-size: 16px">sbHorrizontal:水平方向;&nbsp;</span></li>
<li><span style="font-size: 16px">sbVertical:垂直方向。</span></li>
</ul>
</li>
<li><span style="font-size: 16px">LargeChange&nbsp; //设置滚动条滚动的距离Max&nbsp; //此属性用于设置滚动条的最终值 ,取值在-2147483648和2147483647之间。<br></span>
<ul>
<li><span style="font-size: 16px">这是一个相对数。例如:LargeChange属性设为10,如果Max属性减去Min属性为80,则用户只要按8次滚动条就能从一端滚到另一端。</span></li>
</ul>
</li>
<li></li>
<li><span style="font-size: 16px">Min //此属性用于设置滚动条的起始值&nbsp;</span></li>
<li><span style="font-size: 16px">PageSize&nbsp; //当按PgUp或PgDn键时,设置滚动条滚动的距离Position设置或返回滚动条中小方块的位置,默认是1</span></li>
<li><span style="font-size: 16px">SmallChange //用户按下滚动条两端的箭头时滚动条滚动的距离Position属性用于设置或返回滚动条中小方块的位置,可以在设计期设置Position属性指定的小方块的起始位置,也可以在运行期修改Position属性使滚动条滚动。</span>
<ul>
<li><span style="font-size: 16px">SmallChange属性与LargeChange属性相似,不同的是,它是用户按滚动条两端的箭头时滚动条滚动的距离,默认值是1。&nbsp;</span></li>
</ul>
</li>
<li></li>
</ul>
<p><br data-filtered="filtered"><span style="font-size: 16px"><strong>3、事件</strong></span><br data-filtered="filtered"><span style="font-size: 16px">OnChange&nbsp; //用户操作滚动条或者通过编程直接修改Position属性的值,都会触发该事件。OnScroll事件只在用户操作滚动条时才会发生,OnChange事件发生在OnScroll事件之后。</span><br data-filtered="filtered"><span style="font-size: 16px">Position&nbsp; //属性的值,都会触发该事件&nbsp;</span><br data-filtered="filtered"><span style="font-size: 16px">OnScroll //当用户操作滚动条时将触发这个事件,其中ScrollPos参数返回滚动条中小方块的位置ScrollCode参数返回滚动条的状态。可以是以下各值:</span></p>
<ul>
<li><span style="font-size: 16px">scLineUp:用户按下滚动条的左或上箭头或者键盘上的向上方向键。&nbsp;</span></li>
<li><span style="font-size: 16px">scLineDown:用户按下滚动条的右或下箭头或者键盘上的向下方向键。&nbsp;</span></li>
<li><span style="font-size: 16px">scPageUp:用户单击滚动条内小方块左边或上边的区域或者按下PgUp键。&nbsp;</span></li>
<li><span style="font-size: 16px">scPageDown:用户单击滚动条内小方块右边或下边的区域或者按下PgDn键。&nbsp;</span></li>
<li><span style="font-size: 16px">scPosition:用户在滚动条内拖拽小方块并且已释放。&nbsp;</span></li>
<li><span style="font-size: 16px">scTrack:用户正在拖拽小方块。&nbsp;</span></li>
<li><span style="font-size: 16px">scTop:用户把小方块移到滚动条的上端或左端。&nbsp;</span></li>
<li><span style="font-size: 16px">scBottom:用户把小方块移到滚动条的下端或右端。&nbsp;</span></li>
<li><span style="font-size: 16px">scEndScroll:用户操作滚动条后释放了鼠标或按键。</span></li>
</ul>
<p>&nbsp;</p>
<p><br data-filtered="filtered"><br data-filtered="filtered"><span style="font-size: 14px; color: rgba(136, 136, 136, 1)">创建时间:2020.06.11  更新时间:</span></p>
<p>&nbsp;</p>

</div>
<div id="MySignature" role="contentinfo">
    博客园 滔Roy https://www.cnblogs.com/guorongtao 希望内容对你有所帮助,谢谢!<br><br>
来源:https://www.cnblogs.com/guorongtao/p/13094226.html
頁: [1]
查看完整版本: Delphi 滚动条组件 TScrollBar 介绍