Добавить записи из одного TList в другой

← →
DelphiLexx © (2006-08-17 09:42) [0]

Есть lst1, lst2: TList;
lst1 - содержит определенные записи
как добавить в конец lst1 записи из lst2 - т.е. подобно функции Append.

← →
MBo © (2006-08-17 09:44) [1]

А что, своих идей никаких нет?

← →
DelphiLexx © (2006-08-17 09:45) [2]

> А что, своих идей никаких нет?

Есть можно через цикл можно воспользоваться готовым методом TList"a только вот каким?

← →
Мефисто (2006-08-17 09:59) [3]

TList.Add()
TList.Insert();

Хочешь большего - пиши наследника от TList с нужным тебе фунционалом.

← →
Сергей М. © (2006-08-17 10:06) [4]

> DelphiLexx © (17.08.06 09:42)

см. TList.Assign()

← →
Пусик © (2006-08-17 10:07) [5]

TMyList=class(TList) public procedure AddItems(SrcList: TList); end; procedure TMyList.AddItems(SrcList: TList); var i: Integer; begin for i := 0 to SrcList.Count - 1 do Add(SrcList.Items[i]); end;

> см. TList.Assign()

Assign заменит содержимое lst1 на lst2, а мне нужно добавить содержимое lst2 к концу содержимого lst1.

for i := 0 to lst2.Count - 1 do lst1.AddObject(lst2.Objects[i]);

ЗЫ: насчет имен свойств ежели че не пинать :)

> DelphiLexx © (17.08.06 10:10) [6]
>
>
> > см. TList.Assign()
>
> Assign заменит содержимое lst1 на lst2, а мне нужно добавить
> содержимое lst2 к концу содержимого lst1.

Ты хоть бы справку удосужился почитать, прежде чем делать утверждение)

Добавить записи из одного TList в другой Найти похожие ветки