![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
А почему так долго?
Феликс © (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.