Unir 2 RTF que tienen una imagen y un pequeño encabezado

[gdlrinfo]

Estimados nuevamente por aquí con otra duda necesito unir 2 RTF que tienen una imagen y un pequeño encabezado la cuestión es que utilizo esto :

Código Delphi [-]
Var
sAr1,sAr2 : TStringList;
begin
  sAr1 := TStringList.Create;
  sAr2 := TStringList.Create;
  sAr1.LoadFromFile('C:\RTF\1.rtf');
  sAr2.LoadFromFile('C:\RTF\2.rtf');
  sAr1.AddStrings(sAr2);
  sAr1.SaveToFile('C:\RTF\Nuevo.rtf');
  sAr1.Free;
  sAr2.Free;
end;

pero solo me deja el primero el segundo no lo agrega tienen alguna idea ?
desde ya muchas gracias !!!

[Casimiro Noteví]

Hola, gdlrinfo, por favor, no olvides poner títulos descriptivos a tus preguntas, "Buenas" no describe nada
Saludos.

[gdlrinfo]

JAJAJA pensé que le había puesto Unir 2 RTF que tienen una imagen y un pequeño encabezado jajja gracias!

[Casimiro Noteví]

Empezado por gdlrinfo

JAJAJA pensé que le había puesto Unir 2 RTF que tienen una imagen y un pequeño encabezado jajja gracias!

JaJaJa... no, eso lo he puesto yo. En sustitución de tu "Buenas"

[gdlrinfo]

Empezado por Casimiro Notevi

JaJaJa... no, eso lo he puesto yo. En sustitución de tu "Buenas"

JUAAAAAA Buenoooo gracias!!!!!!