Retro video games delivered to your door every month!
Click above to get retro games delivered to your door ever month!
X-Hacker.org- dBsee 4.6 - The Library - <b>dbink()</b> http://www.X-Hacker.org [<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]
dbInk()
Returns the pressed key
------------------------------------------------------------------------------
Syntax:

     dbInk() --> cAct

Parameters:

     NONE

Returns:

     <cAct> returns the action that corresponds to the pressed key and sets
     the three PUBLIC variables Act, Sa, and A. Act = 3 chars action as
     defined in dbStart.ini; SA = LOWER() case of the CHR() of the scan
     code of the pressed key; A = Scan Code of the pressed key.
     
     dbInk() also returns the Mouse action, returning "mou" in Act if a
     mouse button has been used. SA is assigned a blank space and A is
     assigned the pressed button. The BACKFUN can contain the function that
     will be repeatedly executed in the all wait states in which the
     application waits for a key to be pressed. If you have linked the
     "DFCAPT" object module to the application, you will be able to capture
     the application screens, which you will use to build your dB-Doc
     documentation and your dB-Show tutorial.
     
     dbInk() executes the function stored in dfHotFun if keys Alt+F1 are
     pressed
     
     dbInk() quits the application if keys Alt+F4 are pressed

Description:

     Manages the application Inkey system and the mouse. In all wait states
     a 'Background' function is executed. The name of this function is
     contained in the PRIVATE variable BackFun. Normally, this variable
     does NOT exist. If it is created, dBInk() will execute the refereced
     function. This function may also contain parentheses and arguments.

Example:

     #include "Common.ch"
     MEMVAR  BackFun, Act
     PRIVATE BackFun
     BackFun := "dfClock"
     Act := dbInk() // Returns the action associated
                    // to the key
     ? Act          // Ex. "esc"
     BackFun := ""
     
     * ###################################################
     PROCEDURE dfClock()
     * ###################################################
     @ 0, 0 SAY dfTime()
     RETURN

See also:

     dfInkey(), dfMemStatus(), tbInk()

See Also: dfInkey() dfMemStatus() tbInk()

Online resources provided by: http://www.X-Hacker.org --- NG 2 HTML conversion by Dave Pearson