SCRSetPicture()

Changes the picture of a picture object.

Syntax

SCRSetPicture(nPic) --> lSuccess

Arguments

<nPic> --> the number of the picture object.

Returns

TRUE if the picture was found and successfully painted, otherwise FALSE.

Description

This function changes the picture associated with a picture object.

Examples

* User 'clicked on button' mode

If Mode == 11

   If ScrRead("Checkbox1")

      ScrWrite("Checkbox1", "N")

   Else

      ScrWrite("Checkbox1", "Y")

   Endif

   If ScrRead("Checkbox1")

      SCRSETPICTURE(1, PathProgram() + "Picture1.bmp")

   Else

      ScrSetPicture(1, PathProgram() + "Picture2.bmp")

   Endif

Endif