Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Outputting FRX line 2 RTF lines
Message
From
30/07/1999 17:00:31
Dragan Nedeljkovich (Online)
Now officially retired
Zrenjanin, Serbia
 
 
To
28/07/1999 11:27:09
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Miscellaneous
Thread ID:
00247176
Message ID:
00248401
Views:
22
>Im trying to add line functionality to a makeshift frx to rtf driver. Im having a great deal of trouble converting lines to the rtf format. Does anyone know the syntax for the rtf lines and if the positions are in twips pixels etc. if anyone could point me to a resource it would be much appeciated.

RTF uses twips; I wouldn't know how to draw lines in RTF, but here's a bit of code to draw a table in RTF (datoteka, polje, comment, brdec, duzina etc are the fields from my table where the report goes from):
	text
\par 
\par \trowd \trgaph70\trleft-70 \clbrdrt\brdrs\brdrw30\brdrcf1 \clbrdrl\brdrs\brdrw30\brdrcf1 \clbrdrb\brdrs\brdrw30\brdrcf1 \clcfpat1\clcbpat8\clshdng6000 \cellx1276\clbrdrt\brdrs\brdrw30\brdrcf1 \clbrdrb\brdrs\brdrw30\brdrcf1 \clcfpat1\clcbpat8\clshdng6000 
\cellx1985\clbrdrt\brdrs\brdrw30\brdrcf1 \clbrdrb\brdrs\brdrw30\brdrcf1 \clcfpat1\clcbpat8\clshdng6000 \cellx2552\clbrdrt\brdrs\brdrw30\brdrcf1 \clbrdrb\brdrs\brdrw30\brdrcf1 \clcfpat1\clcbpat8\clshdng6000 \cellx3354\clbrdrt\brdrs\brdrw30\brdrcf1 \clbrdrb
\brdrs\brdrw30\brdrcf1 \clbrdrr\brdrs\brdrw30\brdrcf1 \clcfpat1\clcbpat8\clshdng6000 \cellx9142 \pard 
		
\intbl {\b\cf8 FieldName\cell Type\cell Len.\cell Decim.\cell Description
\par \cell }\pard \intbl {\b\cf8 \row }\trowd \trgaph70\trleft-70 \clbrdrl\brdrs\brdrw30\brdrcf1 \clbrdrb\brdrs\brdrw15\brdrcf1 \cellx1276\clbrdrb\brdrs\brdrw15\brdrcf1 \cellx1985\clbrdrb\brdrs\brdrw15\brdrcf1 \cellx2552\clbrdrb\brdrs\brdrw15\brdrcf1 
\cellx3354\clbrdrb\brdrs\brdrw15\brdrcf1 \clbrdrr\brdrs\brdrw30\brdrcf1 \cellx9142 \pard 
	endtext

	scan for !empty(polje) while datoteka=_d
		text
\pard \intbl <<proper(trim(polje))>>\cell 
\pard \intbl <<tip>>\cell 
\pard \intbl <<duzina>>\cell 
\pard \intbl <<brdec>>\cell 
\pard \intbl <<iif(empty(naslov1),"", "{\b "+trim(naslov1)+iif(empty(comment),"}"," \par }"))>> <<strt(comment, chr(13), " \par ")>>\cell 
\pard \intbl \row \pard 
		endtext
	ends
\ \par

back to same old

the first online autobiography, unfinished by design
What, me reckless? I'm full of recks!
Balkans, eh? Count them.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform