Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Outputting FRX line 2 RTF lines
Message
De
30/07/1999 17:00:31
Dragan Nedeljkovich (En ligne)
Now officially retired
Zrenjanin, Serbia
 
 
À
28/07/1999 11:27:09
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Divers
Thread ID:
00247176
Message ID:
00248401
Vues:
27
>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.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform