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

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

А почему так долго?


Феликс ©   (2002-10-08 21:07:00) 

procedure TForm1.Button1Click(Sender: TObject);
var SL : TStringList;
i : Integer;
begin
SL := TStringList.Create;
try
for i := 0 to ComboBox1.Items.Count - 1 do
begin
SL.LoadFromFile(ComboBox1.Items[i]);
RichEdit1.Lines.AddStrings(SL);
end;
finally
SL.Free;
end;
end;

Этот код грузит в richedit список txt файлов, что указаны в combobox. Общий размер этих файлов 276 кб. Загрузка этих файлов идет 40-45 сек. Почему так долго? Или это нормально?


¤NoNaMe¤   (2002-10-08 22:01:00) [1]

>Загрузка этих файлов идет 40-45 сек

Похоже тут проблема в самом RichEdit...
В Memo файлы общим весом 410К грузятся за пару сек, а в RichEdit действительно очень долго... я так и не дождался...


Jeer   (2002-10-08 21:26:00) [2]

Сорри TCombobox.Items.BeginUpdate и тп.


Jeer   (2002-10-08 21:25:00) [3]

F1 TCombobox.Strings и их методы


Феликс   (2002-10-08 21:22:00) [4]

Е-мое! А куда это сувать, а?


Jeer   (2002-10-08 21:20:00) [5]

Попробуй BeginUpdate и EndUpdate.


Наверх

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