[ElDuc]

Pongo un pequeño ejemplo de lo que necesito y no consigo.

Código Delphi [-]
Var
  Texto:Array[0..64000] Of Char;

procedure TForm2.Button1Click(Sender: TObject);
Var
    S1, S2:String;
begin
Texto:='Hola mundo';
S1:=Texto;
S2:=' Cómo estás?';
// Qué hacer para conseguir que Texto = 'Hola mundo Cómo estás?'
// Es decir ¿cómo añadir texto al final del que ya hay?
end;

Gracias otra vez