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

Вниз

Отображение Splash-формы!   Найти похожие ветки 

 
Alex Shulg ©   (2003-09-26 18:09) [0]

Добрый день всем,

наталкнулся на странную вещь. Есть список ListBox, делаю анализ строк в нем.
Дабы повысить информативность программы, сделал форму с прогрессом, которая
отображается во время обработки строк. В процессе обработки некоторые строки
удаляются.

// Delphi 5

FormSplash.Show;
FormSplash.Update;
FormSplash.Gauge1.MaxValue:=ListBox1.Items.Count;

i:=0;
With ListBox1.Items do
While i<Count do
begin
FormSplash.Gauge1.Progress:=FormSplash.Gauge1.MaxValue-Count+i;
FormSplash.Update;
if ... then Delete(i)
else i:=i+1;
end;

FormSplash.Close;

Так вот проблема в том, что после закрытия сплешь-формы, количество строк
возвращается к исходному, как-будто ничего и не удалилось (в цикле строки
удаляются, пошаговой отладкой проверил). Заремирую все строки кода,
относящиеся к сплешь, все работает!
В чем может быть прикол?


 
ZEE ©   (2003-09-26 18:18) [1]

так что не так?
With ListBox1.Items do
...
if ... then Delete(i)

это как раз и удаляет строки ListBox-а...
убери приведенный код - не будут удалятся.
Сформулируй яснее надо удалять или не надо.


 
ZEE ©   (2003-09-26 18:19) [2]

Кстати, а при чем тут "Splash-формы" ?


 
Alex Shulg ©   (2003-09-29 15:43) [3]

Да код то правильный, выяснил, что после закрытия Сплеш-формы, вызывается OnActivate главной формы, а в нем я загружал список. Перенес в OnCreate и все в порядке. Всем спасибо.



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

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

Наверх




Память: 0.47 MB
Время: 0.02 c
3-27368
said46
2003-09-17 13:10
2003.10.09
Одним запросом...


14-27742
kopcap
2003-09-19 19:30
2003.10.09
Как запускать CGI скрипты на своём компе ???


1-27533
Mishenka
2003-09-29 19:04
2003.10.09
Есть ли в дельфях библиотеки для вычислительных методов?


3-27412
ZoKr
2003-09-18 05:30
2003.10.09
MaskEdit


1-27571
sagchat
2003-09-29 14:10
2003.10.09
Где найти инфу по Randomize