Difícilmente puede ser más sencillo, pero vamos a intentarlo.
Supón que quieres que cada vez que escribas:
el resultado sea ambas cadenas unidas con un salto de línea, como si hubieras hecho:
Cadena1 + LineEnding + Cadena2
Como el operador "*" no existe para cadenas, tienes que crear uno (o sea, "sobrecargar" el operador para que también funcione con cadenas):
operator* (const S1, S2: string): string;
begin
Result := S1 + LineEnding + S2;
end;
Y ya está, desde ese punto, cada vez que hagas:
UnaCadena := OtraCadena * OtraCadenaMas
UnaCadena acabará con el valor de las otras dos separadas por un fin de línea.
¿Fácil o no?