[NumLock]

Сообщение от j00nik

Конкотенировать

Конкатена́ция (лат. concatenatio «присоединение цепями; сцепле́ние») — операция склеивания объектов линейной структуры, обычно строк.

Код:

var
  L1, L2, L3: TStrings;
begin
  L1:=TStringList.Create;
  L2:=TStringList.Create;
  L3:=TStringList.Create;
  try
    L1.Add('1');
    L1.Add('2');
    L1.Add('3');

    L2.Add('a');
    L2.Add('b');
    L2.Add('c');

    L3.AddStrings(L1);
    L3.AddStrings(L2);
  finally
    L3.Free;
    L2.Free;
    L1.Free;
  end;
end;