Tag Archives: Yes/No

SP_YNREADER

Posted on by vivaclipper 
YNREADER()

  Short:
  ------
  YNREADER() Creates specialized Yes/No get reader block

  Returns:
  --------
  <bReader> => get reader block for logical GET

  Syntax:
  -------
  YNREADER()

  Description:
  ------------
  Creates a reader block that pops up a Yes/No window
  to get the logical value for the current get.

  Implement by using the SEND keyword for your
  @Say..Get.. statements.

  i.e. @10,10 say blah get blahblah SEND reader:=YNREADER()

  Use this on a LOGICAL get only.

  Examples:
  ---------
   // while in the get V1, a Yes/No window pops up for
  logical selection

   v1 := .f.

   @10,10 get v1 send reader := ynreader()

   READ

  Source:
  -------
  S_READRS.PRG

SP_MESSYN

Posted on by vivaclipper 
MESSYN()

  Short:
  ------
  MESSYN() Popup YesNo prompt box

  Returns:
  --------
  <lYes> => True for yes, False for No

  Syntax:
  -------
  MESSYN(cQuestion,[cYes],[cNo],[nTop],[nLeft])

  Description:
  ------------
  Pops up a box and displays a question <cQuestion>
  and two prompts.

  [cYes] ,[cNo] are optional prompts 1 and 2. Default
  is YES/NO.

  [nTop] and [nLeft] are optional box top and left
  coordinates. Default is centered.

  Examples:
  ---------
   if messyn("Are you done")

   if messyn("Are you done","Not yet","Almost",10,10)

   if messyn("Are you done","Not Yet","Almost")

  Source:
  -------
  S_MESSYN.PRG