Question

在Delphi中，如何利用滚动条改变字体的大小

怎样写代码？

Answer 1

edit、label之类的直接设置Font的字体大小，字体大小在delphi中对应的是一些连续的常量，可以响应滚动的点击，拖动等事件，用滚动条的最小值等于字体的最小值，按比例或者直接赋值最大值，用滚动的最终位置设置字体大小。