如何控制TListview的滚动条到指定的记录??? 使用listview显示记录,当记录数超过显示区域会自动加载滚动条,当我对其中一条记录修改后,再次刷新则无法定位到刷新前的记录?换句话说就是如何定位滚动条?知道的请跟帖! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 aaa:=listview1.ItemIndex;listview1.ItemIndex:=aaa; 问题基本解决:self.lvwRecord.Scroll(0, (self.lvwRecord.Selected.Index - 1) * 15);不过在记录数很多例如500时还是不准确。 最后采用方案:listview.font.size = 9. if self.lvwRecord.Selected <> nil then begin case self.lvwRecord.Selected.Index of 0..50: FSelectItemPosY := (self.lvwRecord.Selected.Index) * 14; 51..100: FSelectItemPosY := (self.lvwRecord.Selected.Index) * 16; 101..1000: FSelectItemPosY := (self.lvwRecord.Selected.Index -5) * 17; end; end; self.lvwRecord.Scroll(0, FSelectItemPosY); 不会吧,是否ListView没有这样的功能呢?我想知道有好的方法吗?毕竟,用Index来这样控制好象不适合吧。因为记录数如果超过一千呢,这样的方法治标不治本。 使用 DevExpress 遇到的问题 急 100分:动态创建的adodataset控件,如何制定其中的某个字段的GetText事件?? kodak控件问题,碰到过吗? 一个类的公共变量问题 异常处理的一点问题 如何存储数据库 为什么Adoquery过滤Filter不能多条件? 跪求水晶报表8.5 开发版安装文件 各位帮忙讲一下 LockWindowUpdate(Handle);是什么意思 delphi 键盘按键操作问题 高分挑战DHTMLEDIT.OCX高手 高分求源码。怎么在Delphi中建立套帐。
self.lvwRecord.Scroll(0, (self.lvwRecord.Selected.Index - 1) * 15);
不过在记录数很多例如500时还是不准确。
if self.lvwRecord.Selected <> nil then
begin
case self.lvwRecord.Selected.Index of
0..50: FSelectItemPosY := (self.lvwRecord.Selected.Index) * 14;
51..100: FSelectItemPosY := (self.lvwRecord.Selected.Index) * 16;
101..1000: FSelectItemPosY := (self.lvwRecord.Selected.Index -5) * 17;
end;
end;
self.lvwRecord.Scroll(0, FSelectItemPosY);