关于Listbox的问题?
1. 如何设置Listbox的行间距?
2. 如何实现当鼠标点击Listbox时,被选中的那一行在鼠标点击处出现一控件?
也就是怎么计算出被选中的那一行鼠标点击处的绝对坐标位置(X,Y)?
abs(ListBox1.Font.Height);就是高度
-
ListBox1.Font.Height*2+4
-
呵呵
ListBox1.Font.Height经常是负的，所以最好加abs
还有，因为这是字体高度，所以最好加一个常数，但不要*2，这是不对了。
所以应该是abs(ListBox1.Font.Height)+C;，你测试一下，给C一个值，就可以了。
-
ListBox1.itemheight := 值；
ListBox1.Style := lbOwnerDrawFixed;