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

Вниз

Как работать с невизуальным TListItems   Найти похожие ветки 

 
Yuri Btr ©   (2002-09-03 11:24) [0]

Ув. мастера, в Form1Create создаю экземпляр
l1:=TListItems.Create(ListView1);
где l1:TListItems;
И при добавлении Items в L1 у меня они добавляются и в ListView1
тоже, но мне нужно обработать несколько тысяч Items, и естественно всё это дело тормозит. Можно ли как нибудь сделать добавление Items в L1 а по окончании просто присвоить их ListView1 (что то типа ListView1.Items:=l1) ?
Я так думаю надо при создании писать не l1:=TListItems.Create(ListView1) а l1:=TListItems.Create(self) ? Или нельзя создать отдельный TListItems не связав его с конкретным ListView ?

Заранее спасибо.


 
Виктор Щербаков ©   (2002-09-03 11:27) [1]

TListItems.BeginUpdate
TListItems.EndUpdate


 
Yuri Btr ©   (2002-09-03 11:34) [2]

to Виктор Щербаков ©
Правда и чего это я забыл про BeginUpdate/EndUpdate

Но всё таки, если указать l1:=TListItems.Create(nil), то почему-то вылетает Exception при попытке добавить новую запись!


 
Виктор Щербаков ©   (2002-09-03 11:38) [3]


> Но всё таки, если указать l1:=TListItems.Create(nil), то
> почему-то вылетает Exception при попытке добавить новую
> запись!


Смотри в исходнике.
Чего ж ты хочешь, если Owner = nil?

function TListItems.Add: TListItem;
begin
Result := Owner.CreateListItem;
ListView_InsertItem(Handle, CreateItem(Count, Result));
end



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
1-50690
Masa
2002-09-04 16:55
2002.09.16
TreeView


1-50785
maxim2
2002-09-03 14:25
2002.09.16
Хочу сделать такое окно как редактор кода в делфи


1-50745
Andy BitOff
2002-09-05 10:31
2002.09.16
Помогите решить проблему!!!!!!!!


1-50838
neg2001
2002-09-03 15:00
2002.09.16
Господа, подскажите откуда можно нормально cкачать Delphi 7


3-50578
lety
2002-08-23 17:33
2002.09.16
индекс в dbf