Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

ParameterDescription of FieldsCommentsDefault
Parm1 -Header Font<1> Font Name"Font String"Courier New
 <2> Point Size4-12810
 <3> JustificationNot used - set the justification with the header and footer flags""
 <4> FontBold0=Normal

1=Bold

0
 <5> Italics0/10
 <6> Underline0/10
 <7> StrikethroughNOT USED0
 <8> ForeColorCOLORREF0 (Black)
Parm2 - Footer FontSame format as the Header FontStructure  

See also

FONT Set_Printer Message

Example

 
Code Block
/* The following example shows how to use the FONTHEADFOOT message to change the header to Bold, 14 point, Time New Roman and the footer to 10 Point, Times New Roman.*/
 
declare function Set_Printer
stat = Set_Printer("INIT") ;* Start printing
 
headerfont = "Times New Roman,14,L,1" ;* 14 point, Left just, Bold
convert "," to @fm in headerfont ;* Use @FM delimiter
footerfont = "Times New Roman,14,L" ;* 14 point, Left just, Bold
convert "," to @fm in footerfont ;* Use @FM delimiter
 
stat = Set_Printer("FONTHEADFOOT", headerfont, footerfont) ;* Set font
stat = Set_Printer("TERM") ;* End printing