[j00nik]

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

Код:

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;

можешь плиз запилить так что б на пример
L1 - это текст который мы вводим в memo1
L2 - это текст который мы вводим в memo2
L3 - это поле memo3 является результирующим...
за ранее Спасибо!