Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перерисовки в FileListBox [D7, WinXP]


Сергей Никонов ©   (2005-08-18 22:00:00) 

Здравствуйте!

У меня такой вопрос. Есть FileListBox. Выделяю в нем файл. Нажимаю на кнопку, файл удаляется (deleteFile). Потом обновляю FileListBox (.Update). И начинается перерисовка списка. если список довольно большой, то это это весьма достает. Как от этого избавиться?

with FileListBox1 do
   if MessageDlg('Delete ' + FileName + '?', mtConfirmation,
     [mbYes, mbNo], 0) = mrYes then
     if DeleteFile(FileName) then Update;

Спасибо!


Leonid Troyanovsky   (2005-08-19 09:22:00) [1]


> Сергей Никонов ©   (18.08.05 22:00)  

>      if DeleteFile(FileName) then Update;


if DeleteFile(FileName) then DeleteSelected ?

--
Regards, LVT.


Сергей Никонов   (2005-08-18 22:21:00) [2]

Ну, что же, спасибо!


Defunct   (2005-08-18 22:15:00) [3]

Принципиально (по улучшению алгоритма перерисовки TFileListBox) ничего не предложу, потому что вникать долго.

Самое простое решение, чтобы выглядело снаружи все нормально -
лочить Control перед update'ом, и разлочивать после.


Наверх

Титульная страница Поиск, карта сайта Написать письмо