Вниз
Скачать: CL | DM;

Listview удаление НЕвыделенных строк   Найти похожие ветки 

 
Аликъ   (2007-02-18 18:56) [0]

Подскажите плз как удалить все невыделенные строки в listview .
спс


 
Dmitrij_K   (2007-02-18 19:01) [1]

примерно так
for i:=(LV1.Items.Count-1) downto 0 do
begin
 LV1.Items.BeginUpdate;
 if not LV1.Items[i].Selected then
   LV1.Items.Delete(i);
 LV1.Items.EndUpdate;
end


 
TRUNK ©   (2007-02-18 19:34) [2]


> Dmitrij_K   (18.02.07 19:01) [1]

При таком ипользовании BeginUpdate/EndUpdate толку от них не будет.
Нужно так:

LV1.Items.BeginUpdate;
for i := (LV1.Items.Count-1) downto 0 do
 if not LV1.Items[i].Selected then
   LV1.Items.Delete(i);
LV1.Items.EndUpdate;


 
Dmitrij_K   (2007-02-18 19:42) [3]

точно


 
Аликъ   (2007-02-18 20:07) [4]

СПС
Вот еще вопрос про Listview

при прокрутке он сильно мерцает  
пробовал doublebuffered  ,  как мерцал так и мерцает.
Можно ли от избавится от мерцания или ограничить скорость прокручивания



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c
15-1171538435
Ega23
2007-02-15 14:20
2007.03.11
Миграция с Delphi5 на Delphi7


2-1171712728
Nija
2007-02-17 14:45
2007.03.11
Нужна срочная помощь


2-1171473737
Washington
2007-02-14 20:22
2007.03.11
ADOQuery и INI-файлы


2-1171922373
Allexandr
2007-02-20 00:59
2007.03.11
application.MessageBox


2-1170926380
astronom
2007-02-08 12:19
2007.03.11
Копирование директорий




   Наверх