Xbasic
*BIN_TO_RTF Function
Syntax
RTF_Text as C = *BIN_TO_RTF(data as B)
Arguments
- dataBinary
The contents of a RTF memo field.
Returns
- RTF_TextCharacter
An ASCII encoded representation of the RTF text.
Description
Convert from binary to rtf.
Discussion
The *BIN_TO_RTF() function converts binary RTF text to ASCII encoded RTF text.
Example
The following example reads RTF binary text from the AlphaSports a_alphasports_help table, writes it to an HTML file, and displays it in a browser:
dim tbl as P dim rtftext as C tbl = table.open("a_alphasports_help") tbl.fetch_first() rtftext = *bin_to_rtf(tbl.notes) ? rtftext = {\rtf1\ansi \deff0{\colortbl;\red0\green0\blue0;\red0\green128\blue0;}{\fonttbl{\f0\fswiss Tahoma;}{\f1\fnil Verdana;}}{{\b \f1 \cf1 \fs28 Payment Method\par }{\f1 \cf1 \fs20 \par The PAY_METHOD field provides the user with a list of acceptable payment methods. Field rules define the payment methods, which are:\par \par \tab Amex\par \tab MCard\par \tab Visa\par \tab Check\par \tab Cash\par \tab Other\par \tab No Charge\par \par }{\b \f1 \cf1 \fs20 See Also:\tab }{\field{\*\fldinst{\ul \f1 \cf2 \fs20 HYPERLINK "Credit Card Number"}}}{\f1 \cf1 \fs20 \par \tab \tab }{\field{\*\fldinst{\ul \f1 \cf2 \fs20 HYPERLINK "Credit Card Expiration"}}}{\f1 \cf1 \fs20 \par \tab \tab }{\field{\*\fldinst{\ul \f1 \cf2 \fs20 HYPERLINK "COND1 Conditional Object"}}}{\f1 \cf1 \fs20 }}} save_to_file(*rtf_to_html(rtftext), "C:\temp\example.html") sys_open("C:\temp\example.html")
See Also