¿Existe función para asignar a una cadena el resultado de concatenarla con otra?

[*Caro*]

Empezado por noob

@Caro con concat no gano mucho frente a Cadena1 := Cadena1 + Cadena2; pues sería:

Hola de nuevo, no ganas mucho pero sería muy parecido a lo que tienes ahora.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  a, b: String;
begin
  a := 'hola';
  b := 'adios';
  a := Concat(a, b);
  ShowMessage(a);
  //o
  ShowMessage(Concat(a, b));
end;

Saluditos