Module: _text      Library: Clipper 5.3


This module contains the following functions and procedures:



Note: Because this is raw decompiler output, the code is closer
to that seen in a .PPO file, rather than a .PRG file. In other
words, you must allow for the preprocessor conversions normally 
performed based on the contents of STD.CH and other .CH files
 
#include "common.ch"
#include "inkey.ch"

//-----------------------------------------------------------------
//  file-wide static variables
//
static Static1, Static2, Static3, Static4

//---------------------------------------------------[top]-
//  __TEXTREST
//
function __TEXTREST

   if ( Static1 == "PRINTER" )
      set printer (Static2)
   else
      Set(_SET_EXTRAFILE, Static4)
      Set(_SET_EXTRA, Static3)
   endif
   return Nil

//---------------------------------------------------[top]-
//  __TEXTSAVE( Arg1 )
//
function __TEXTSAVE( Arg1 )

   Static1 := Arg1
   if ( Static1 == "PRINTER" )
      Static2 := Set(_SET_PRINTER, .T.)
   else
      Static3 := Set(_SET_EXTRA, .T.)
      Static4 := Set(_SET_EXTRAFILE, Arg1)
   endif
   return Nil

//---EOF


Use your Browser's BACK button to return to Function Listings