Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.09.11;
Скачать: CL | DM;

Вниз

Перерисовки в FileListBox   Найти похожие ветки 

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

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

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

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

Спасибо!


 
Defunct ©   (2005-08-18 22:15) [1]

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

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


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

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


 
Leonid Troyanovsky ©   (2005-08-19 09:22) [3]


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

>      if DeleteFile(FileName) then Update;


if DeleteFile(FileName) then DeleteSelected ?

--
Regards, LVT.



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

Текущий архив: 2005.09.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.04 c
14-1124230275
VEG
2005-08-17 02:11
2005.09.11
Поиск ветки


14-1123751547
Akisflat
2005-08-11 13:12
2005.09.11
Сдельная работа для Delphi-программиста, в офисе в любое время.


1-1124696985
_Landgraf_
2005-08-22 11:49
2005.09.11
Использование RichEdit


3-1122216201
ArchValentin
2005-07-24 18:43
2005.09.11
Поиск строки в базе....


1-1124711920
ASoft
2005-08-22 15:58
2005.09.11
Как объединить вертикальные ячейки в Excel (разумеется из Delphi)