Superlib

Overview

What is Superlib ?

Superlib ReadMe

Superlib and Harbour

Downloads

Functions

All Functions

Array Functions

Conversion Functions

Date Functions

DBF Functions

Development  Functions

Environment  Functions

Event  Functions

Expression   Functions

File Functions

GET System Functions

Help Functions

HP  Laserjet Functions

Keyboard Functions

Lookup Functions

Menu Functions

Metafunctions

Misc / Other  Functions

Mouse  Functions

Network   Functions

Popup   Functions

Screen   Functions

String   Functions

Superlib Environment   Functions

Other Info     

Documentation Key

Examples

SuperLib Color Implementation

Color functions

Obsolete Functions

Printer Issues

Mice and SuperLib

Internal DBFs

Internal DBF Structures

Changing SuperLib

Linking with SuperLib

Support

Conflicts with other LIBs

Color chart
       

 

SP_PRNTFRML

PRNTFRML()

  Short:
  ------
  PRNTFRML() Prints a formletter created by formletr()

  Returns:
  --------
  Nothing

  Syntax:
  -------
  PRNTFRML(cForm,[nPageWidth],[nLeftMargin])

  Description:
  ------------
  Prints the form <cForm> from FORMS.DBF with a
  pagewidth of [nPageWidth] and a left margin of [nLeftMargin]

  <cForm> is normally the contents of the template stored in FORMS.DBF
  (previous documentation refered to this parameter as the NAME of the
  form, which is incorrect.

  Examples:
  ---------
  This is used internally by FORMLETR() and FASTFORM().
  Refer to its usage there.

  SELECT 0
  USE FORM
  locate for descript = "MY FORM LETTER" // find letter
  cForm = form->memo_orig      // load contents
  USE
  SELECT MYDBF
  PRNTFRML(cForm,79)


  Source:
  -------
  S_PRNTF.PRG


 

 

SP_PRNT

PRNT()

  Short:
  ------
  PRNT() Writes a string of a given color at row, column

  Returns:
  --------
  Nothing

  Syntax:
  -------
  PRNT(nRow, nColumn, cString, nColor)

  Description:
  ------------
  <nRow>       row

  <nColumn>    column

  <cString>    string

  <nColor>     color attribute

  Examples:
  ---------
   PRNT(10,10,"Hello there",47)  // +W/G

  Notes:
  -------
  Here mainly for compatibility with older version. Was
  previously a C function.

  Source:
  -------
  S_PRNT.PRG

 

 

SP_PRNPORT

PRNPORT()

  Short:
  ------
  PRNPORT() Determine Printer Port to use

  Returns:
  --------
  <cPort> => port chosen

  Syntax:
  -------
  PRNPORT([cPort1],[cPort2]..[cPort9])

  Description:
  ------------
  Allows user to select printer port for SET PRINTER TO
  output. Printer is set to this port

  [cPort1-9] are valid SET PRINTER TO strings

  LPT1 LPT2 LPT3 COM1 COM2 COM3 COM4 <FILENAME>

  Default is "LPT1","LPT2","LPT3"

  Examples:
  ---------
   cTheport := PRNPORT("LPT1","COM1")

  Source:
  -------
  S_PRNPOR.PRG

 

 

SP_POPVYEAR

POPVYEAR()

  Short:
  ------
  POPVYEAR() Pops up a picklist of virtual years

  Returns:
  --------
  <nSelected> => selected year

  Syntax:
  -------
  POPVYEAR([cTitle])

  Description:
  ------------
  Pops up a virtual picklist of years, beginning with
  the current year. As user scrolls down, year increases. As user
  scrolls up, year decreases. Home key returns to the starting
  year.

  [cTitle]  is a popup box title, none by default

  Examples:
  ---------
   nYear := POPVYEAR("Pick a Year")

  Source:
  -------
  S_DPOPS.PRG

 

SP_POPVDATE

POPVDATE()

  Short:
  ------
  POPVDATE() Pops up a picklist of virtual dates

  Returns:
  --------
  <dSelected> => selected date

  Syntax:
  -------
  POPVDATE([dStart],[lWords],[cTitle])

  Description:
  ------------
  Pops up a virtual picklist of dates, beginning with
  the current date. As user scrolls down, date increases. As user
  scrolls up, date decreases. Page up/Page down move by 30 day
  increments. Ctrl-Pgup/Ctrl-Pgdn move by 365 day increments. Home
  key returns to the starting date.

  [dStart] the starting date, today's date by default

  [lWords] show dates as words, False by default

  [cTitle] popup box title, none by default

  Examples:
  ---------
   dDate := POPVDATE(date(),.t.,"Pick a Date")

  Source:
  -------
  S_DPOPS.PRG

SP_POPUPWHEN

POPUPWHEN()

  Short:
  ------
  POPUPWHEN() Allows use of a popup for a GET WHEN clause

  Returns:
  --------
  <lWhen> => when condition, get pre-validation

  Syntax:
  -------
  POPUPWHEN(bPopup,[lShowonUp],[lReturn])

  Description:
  ------------
  This sets up a popup in <bPopup> for use in a GET
  WHEN clause. (the pre validation block). If a value is returned
  from the popup, it is assigned to the get.

  <bPopup> is a codeblock that is evaluated. It is
  passed the current value in the get as a parameter.

  The popup function will pop up upon entry into a GET
  field.

  [lShowOnUp] Normally you wouldn't want this WHEN to
  occur if the user is using the up arrow, and if <lShowOnUp> is
  .f. (the default) it does not occur (the GET is just skipped)

  [lReturn] If set to False (the default) the GET is
  never actually edited, as the WHEN will always return .f., but it is
  assigned the value returned by the popup. By setting it to True,
  the Calendar will pop up, and then the GET will also be put
  through the normal get editor.

  Examples:
  ---------
   // these are codeblocks that do a popup (in this case, a  simple
   //call to msg, and a return of a value)

   b1 := {||msg("Character value"),"Bert"}
   b2 := {||msg("Logical value"),.t.}
   b3 := {||msg("Date value"),date()+100}

   v1 := space(10)
   v2 := .f.
   v3 := ctod("  /  /  ")

   @10,10 get v1 when POPUPWHEN(b1,.f.,.t.)
   @11,10 get v2 when POPUPWHEN(b2,.f.,.t.)
   @12,10 get v3 when POPUPWHEN(b3,.f.,.t.)

   READ

  Source:
  -------
  S_POPVW.PRG