为ListBox添加水平滚动条

简介:
//为ListBox添加水平滚动条
procedure TfrmLNKCCLBD.ShowHorScroll;
var
  i, MaxWidth: integer;
begin
  MaxWidth :=   0;
  for i:=0 to lbxFFLB.Items.Count-1 do
  if MaxWidth<lbxFFLB.Canvas.TextWidth(lbxFFLB.Items.Strings[i]) then
     MaxWidth := lbxFFLB.Canvas.TextWidth(lbxFFLB.Items.Strings[i]);
  SendMessage(lbxFFLB.Handle,LB_SETHORIZONTALEXTENT, MaxWidth+5,0);
end;




本文转自 byteh 51CTO博客,原文链接:http://blog.51cto.com/byteh/54898,如需转载请自行联系原作者

目录
相关文章
|
3月前
QT中 QPlainTextEdit自适应高度的问题(防止出现滚动条)
在QT开发过程中,经常使用到QPlainTextEdit来填入大量的文字,一般我们都会设置QPlainText的固定高度或者默认高度,但是随着文字的增多,就会自动出现滚动条,有时候我们可能需要QPlainText的高度随着自动适应文字的高度(即是说不需要出现滚动条)
74 0
|
C#
C#中,让按钮文字垂直水平都居中
C#中,让按钮文字垂直水平都居中
107 0
|
前端开发 容器
CSS布局之水平居中布局
水平居中布局指的是当前元素在父级元素容器中,水平方向是居中显示的。
463 0
淡入淡出垂直选项卡
在线演示       本地下载
738 0
|
容器
Flex 布局实现子项的完全居中
版权声明:本文首发 http://asing1elife.com ,转载请注明出处。 https://blog.csdn.net/asing1elife/article/details/82862155 ...
1109 0
|
C#
WPF 实现ScrollViewer的垂直偏移滚动跳转
原文:WPF 实现ScrollViewer的垂直偏移滚动跳转 问题:考虑屏幕大小,一般都是会在表单问卷的页面使用ScrollViewer。问卷中问题漏填漏选时,在提交时校验不过,需要滚动跳转至漏填漏选项。
936 0
关于圆角控件
如何新建shape文件:https://jingyan.baidu.com/article/b907e62795139746e7891cb9.html 如何在空间中加入shape.
732 0
|
Android开发 Java 数据格式