//------------------------------------RzListView选择新行并取消上次选择的痕迹 (显示的虚线框)
lvRecord.ItemFocused:=nil; //需加此句,取消上次选择的痕迹
lvRecord.ItemIndex:=Index;
//------------------------------------RzListView选择新行并取消上次选择的痕迹 (显示的虚线框)
lvRecord.ItemFocused:=nil; //需加此句,取消上次选择的痕迹
lvRecord.ItemIndex:=Index;