Here is an example of how to do a full justification using an RFT class. Just create a report and put a textbox on it and strech it to the desired size, and try this:

CLEAR ALL
CLOSE DATABASES all
LOCAL lcStr
lcstr = "Note that there is a limit of 32 characters total for the sum of text"+;
 "before and text after for simple numbering. Multilevel numbering has a limit"+;
  "of 64 characters total for the sum of all levels.NOTE: The file must have a"+;
   ".RTF extension to work properly."+;
   "Note that there is a limit of 32 characters total for the sum of text"+;
 "before and text after for simple numbering. Multilevel numbering has a limit"+;
  "of 64 characters total for the sum of all levels.NOTE: The file must have a"+;
   ".RTF extension to work properly."
CREATE cursor ctext (lctext m,gText g) 
INSERT INTO ctext (lctext) VALUES (lcStr)
_rtfFile = "c:\"+SYS(3)+".rtf" 
SCAN 
   SET TEXTMERGE TO &_rtfFile NOSHOW
   SET TEXTMERGE ON
   \\{\rtf1\ansi\qj <<ALLT(cText.lcText)>>}
   SET TEXTMERGE TO
   APPEND GENERAL gText FROM &_rtfFile CLASS "RICHTEXT.RICHTEXTCTRL.1"
ENDSCAN
REPORT FORM rtfdemo PREVIEW NOCONSOLE

>I put the single field in report designer. And, filled it programmatically before report form. I want to justify this item. Is there any way do it without using word ole automation ?
>
>Thanks.