GML::SET_IMAGELIST - Set Image List ID
Syntax
CALL "GML::SET_IMAGELIST"
Description
This procedure sets the ID of the image list that contains the images to be displayed in the Grid control. GML_TPL$ variable GML_TPL.OPTION% contains the actual control ID value. GML_TPL.IMAGE% though the use of the GML UPDATE procedure is then used to set the imagelist index of the image to be displayed within the grid cell.
Prior to use of this procedure, the IMAGELIST mnemonic must be used to set the parameters and retrieve the imagefile bitmapped images. The ID used with this procedure is the same ID used with the IMAGELIST mnemonic. This procedure is used to initially assign the ID or change a previously assigned ID.
Example
In this example the IMAGELIST mnemonic assigns a control ID of 2501 to the imagelist file named images.bmp and indicates the width of each image within the file is 15 pixels. The GML SET_IMAGELIST procedure then 'links" the imagelist ID to the specific grid that will display the images contained within the imagelist file. In the last part of the example the UPDATE procedure assigns the image at index 2, which is third image in the imagelist file (image locations are zero based) to the grid cell at row 4, column 3, in grid set 1.
.1500 PRINT (SYSGUI)'IMAGELIST'(2501,15,"images.bmp")
.
.
2400 GML.SET%=1
2410 CALL "GML::TPL_PREP"
2420 GML_TPL.OPTION%=2501
2430 CALL "GML::SET_IMAGELIST"
.
.
3010 GML.SET%=1
3020 CALL "GML::TPL_PREP"
3030 GML_TPL.ROW_N%=4
3040 GML_TPL.IMAGE%[3]=2
3050 CALL "GML::UPDATE"