Click above to get retro games delivered to your door ever month!

 CapFormNameGet() / CapFormNameSet()
------------------------------------------------------------------------------
 Purpose:
 Get or set the capture form name.

 Syntax:
 lpszName = CapFormNameGet( iLPTNum )
 lpszName = CapFormNameSet( iLPTNum, lpszNewName )

 Parameters:
 iLPTNum     The LPT device. 1=LPT1: 2=LPT2: 3=LPT3:
 lpszNewName The new form name.

 Returns:
 A character string of length 13.

 The CA-Clipper names for these functions are:
 CapFrmNmeGet() / CapFrmNmeSet()

 Description:
 CapFormNameGet() returns the name of the form used for printing jobs on
 the specified LPT device iLPTNum.

 CapFormNameSet() sets the form name to the string specified by lpszNewName
 on the specified LPT device iLPTNum and returns the previous form name.
 When a form name is set, the change only takes effect after CapStart() is
 called.

 Returns an empty string if there is no form name set, or if an error
 occurs.

 Example:
 // To display the form name used for printing the data captured from LPT1:
 lpszFormname = CapFormNameGet( 1 )
 if ( NWErrorGet() = 0 )
    ? "The form name for LPT1: is ", lpszFormname
 endif
 // To change the name of the form used for printing the data captured
 // from LPT1: to "LETTERHEAD":
 lpszOldForm = CapFormNameSet( 1, "LETTERHEAD" )
 lpszNewForm = CapFormNameGet( 1 )
 if ( NWErrorGet() = 0 )
    ? "The form name for LPT1: was ", lpszOldForm
    ? "The form name for LPT1: is now", lpszNewForm
 endif

 Notes:
 If an empty string is returned, check NWErrorGet().