...make deleting items in a TListView faster?
Author: Mark Lubkowitz
procedure AddNewListViewItems;
var
oldViewStyle: TViewStyle;
begin
odlViewStyle := ListView1.ViewStyle;
ListView1.ViewStyle := vsList;
ListView1.Items.Clear;
{ Add new Listitems here }
{ An dieser werden die neuen ListItems eingefügt }
ListView1.ViewStyle := oldViewStyle;
end;
printed from
www.swissdelphicenter.ch
developers knowledge base