[Tomás]

Hola:

Añade 50 blancos a la cadena y con copy coge los 50 primeros de la resultante.

Código Delphi [-]
cadena := 'Datos del cliente';
blancos := '                                                  ';  //50
cadenadecincuenta := copy(cadena+blancos, 1, 50);

Un saludo.