Bueno pues tenemos un problema y es que usando QrExpression, no acepta la instrucción TRIM, con lo cual obtendríamos algo como:
Pérez López________Juan.
__ =espacios en blanco.
Asi que tienes que quitar los 2 campos y sustituirlos por una etiqueta, y luego en el evento OnPrint de alguno de los campos restantes algo como en este ejemplo:
Código:
procedure TfrLstAgenda.QRDBText5Print(sender: TObject; var Value: String);
begin
QrLabel.Caption:=Trim(DmRauch.AgendaApellidos.Value)+' '+Trim(DmRauch.AgendaNombre.Value);
end;
Un Saludo.