for I := 0 to ListView1.Items.Count - 1 do
begin
SubIndex := ListView1.Items[I].SubItems.IndexOf(AStrToFind);
if SubIndex <> -1 then
begin
MainIndex := I;
Break;
end;
end;
begin
SubIndex := ListView1.Items[I].SubItems.IndexOf(AStrToFind);
if SubIndex <> -1 then
begin
MainIndex := I;
Break;
end;
end;
1.22是对的,后面的是计算机的误差造成的,
这个对计算不影响如果你觉得不好可以,用Roundto四舍五入。