Full/block justification doesn't work for me

I have a toolbar w/ 4 buttons on it - left/center/right/block justification.

The following code works for the first three buttons, but the final button for "full" justification does nothing. My question is why?

case _Tag of
0:
WPRichTExt1.CurrAttr.Alignment := paralLeft;
1:
WPRichTExt1.CurrAttr.Alignment := paralCenter;
2:
WPRichTExt1.CurrAttr.Alignment := paralRight;
3:
WPRichText1.CurrAttr.Alignment := paralBlock;
end;

Thanks,

alan

HI Julian -

I do have these flags turned on for the editor. What else do i need to do? I still do not see the last line being properly justified, and full/block justification just doesn't work. Do i explicitly have to add a soft or hard line break? I'm at a loss here.

alan