關於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;