Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Почему все умирает?

Феликс © (2002-10-08 21:11:00)
Почему когда в программе используешь продолжительный цикл, то программа как бы засыпает... и просыпается только когда цикл выполнен? Как бы сделать так, чтобы цикл не вгонял в полу мертвое состояние программу и давал возможность работать с визуальными компонентами на форме и во время выполнения цикла?

AL2002 (2002-10-08 21:40:00) [1]
>Странно! Не помогает!
По-мойму, всё-таки помогает, только создаются здоровые паузы, когда строки в ричэдит затягиваются.

Юзай Thread. Правда, для меня они темное дело.

Jeer (2002-10-08 21:35:00) [2]
А вот так сразу нельзя ?
Form1.RichEdit2.Lines.LoadFromFile();

AL2002 (2002-10-08 21:33:00) [3]
Слушай, тебе надо просто в ричэдит всё тихо запихнуть?
Создай Thread и в него сунь этот код как процедуру.

Феликс (2002-10-08 21:28:00) [4]
Странно! Не помогает!

Ниже код:
begin
SL := TStringList.Create;
try
for i:=0 to Form1.ComboBox2.Items.Count - 2 do begin
Application.ProcessMessages;
SL.LoadFromFile("Base/"+Form1.ComboBox2.Items.Strings[i]+".txt");
Form1.RichEdit2.Lines.AddStrings(SL);
end;
finally
SL.Free;
end;
end;

AL2002 (2002-10-08 21:25:00) [5]
>Как мне стыдно!!! Ну а чего с Application.ProcessMessages;
>делать? Куда сувать?
В циклы свои.

Феликс (2002-10-08 21:21:00) [6]
Как мне стыдно!!! Ну а чего с Application.ProcessMessages; делать? Куда сувать?

Jeer (2002-10-08 21:13:00) [7]
Спасет
Application.ProcessMessages;

AL2002 (2002-10-08 21:13:00) [8]
Самое простое — Application.ProcessMessages;
А так — то Thread.

Наверх

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