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

dfWinClpEmpty()
Delete the Windows clipboard
------------------------------------------------------------------------------
Syntax:

     dfWinClpEmpty() --> lWin

Parameters:

     NONE

Returns:

     <lWin>  If .T. the clipboard is empty

Description:

     Delete the Windows clipboard
     
     NB This function works only in a Task Windows in a protected mode
     application

Example:

     #include "Common.ch"
     #include "dfWindow.ch"
     
     * ####################################################
     FUNCTION Main()
     * ####################################################
     
     IF dfIsWin() // Is in Windows Task
        dfWinFullScr()  // Set to full screen
     
        ? "Windows Version ", dfWinVer()
     
        IF dfIsWinClp()
           ? "Clipboard Supported"
           ? "Clipboard Version : " , dfWinClpVer()
     
           dfWinClpOpen()  // Open Clipboard
           ? "Clipboard Size    : " , dfWinClpSize()
           ? "Clipboard Get     : " , dfWinClpGet()
     
           ? "Empty Clipboard"
           dfWinClpEmpty() // Empty the old value
           ? "Clipboard Size    : " , dfWinClpSize()
           ? "Clipboard Get     : " , dfWinClpGet()
     
           ? "Clipboard Set     : This text is put "+;
                                  "in Windows"
           dfWinClpSet("This text is put in Windows")
     
           ? "Clipboard Size    : " , dfWinClpSize()
           ? "Clipboard Get     : " , dfWinClpGet()
     
           dfWinClpClose() // Close ClipBoard
        ENDIF
     ENDIF
     
     RETURN NIL

See also:

     dfIswin()