En principio no. Aunque puedes crearte una rutina que mire el ancho total que tiene una linea, e incluir espacios en blanco a lo largo de la linea para que se "justifique" (es lo que hace word no?)
No sé si te ayudará, pero quizás te sirva esta función:
Código Delphi
[-]
function FontWidthInPixels(CanvasHandle:THandle; Str:string;var TheWidth:integer):Boolean;
var s:TSize;
begin
Result := fontdimensioninPixels(CanvasHandle,Str,S);
if Result then TheWidth:= s.cx;
end;
Con ella puedes saber el ancho que ocupa una linea, con la fuente que tenga el Canvas correspondiente.
Un saludote