Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.10.21;
Скачать: [xml.tar.bz2];

Вниз

ListBox жутко тормозит при отображении системных иконок   Найти похожие ветки 

 
Граф   (2002-10-11 04:47) [0]

Попытался вот заставить отобразить ListBox иконки ассоциированные каждому файлу, найденному по определенному критерию.
Но так как таких файлов обычно оказывается много (поиск идет по локальной сети с 50 компьютерами), ListBox начинает виснуть, к тому же он некорректно отображает 32битные иконки (в ХР-стиле), то есть не до конца убирает фон.
Как бы можно решить эту проблему? Правда сделал я это в осбо извращенной форме (см. код)

with FoundFiles.Items.Add do
begin
Caption := FileInfo.Name;
IconsForFiles.AddIcon(GetIcon(Folder+"\"+FileInfo.Name));
ImageIndex:=IconForFile;
IconForFile:=IconForFile+1;
SubItems.Add(Folder);
end;


Функция GetIcon() дает результатом TIcon, взял я эту функцию из Единой базы процедур и функций вот <a href= http://delphibase.endimus.ru/?action=viewfunc&topic=filelink&id=10061>здесь</a>


 
Rouse_   (2002-10-11 04:55) [1]

Приветствую, посмотри как это сделано в демках VirtalListView, очень простой и быстрый код и как раз то что тебе надо

Желаю успехов


 
Граф   (2002-10-11 06:57) [2]

Доброго Вам дня, Rouse_
Нда, куда проще... :) Так я и не разобралсяЮ где он связывает ImageList с ListBox"ом
А компоненты какой попроще нет для отображения набора файлов.
Я вроде нашел одну, но она не дает возможность колонки добавлять.


 
Граф   (2002-10-11 07:29) [3]

Вопрос снимается, мне прислали компонент, за что большое спасибо.



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

Форум: "Основная";
Текущий архив: 2002.10.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.55 MB
Время: 0.038 c
1-68852
xGrey
2002-10-10 14:19
2002.10.21
Работа с ключами (параметрами) запуска приложения


14-68954
AL2002
2002-09-27 22:26
2002.10.21
Помогите. Пожалуйста.


3-68678
Dimedrol
2002-09-27 15:59
2002.10.21
Как раскрасить ROWS! в DBGrid-e ?


14-68920
vopros
2002-10-01 10:57
2002.10.21
Что делать? Как жить?


3-68617
lejik
2002-09-27 12:57
2002.10.21
Как работает IBDataSet





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский