delphi - 如何让TScrollingWinControl滚动

Question

我有一个自定义组件(TScrollingWinControl)。但是滚动条永远不会出现，如何在这个组件上显示滚动条？您是否必须创建一个过程来读入它们，或者它们都准备好了吗？

Answer 1

您指定的Range 长于控件的客户端宽度/高度。要滚动，您可以设置其位置。例如:

HorzScrollBar.Range := ClientWidth * 2;
HorzScrollBar.Position := HorzScrollBar.Range - ClientWidth;