property List.HTMLPicture(Key as String) as Variant
Adds or replaces a picture in HTML captions.

TypeDescription
Key as String A String expression that indicates the key of the picture being added or replaced. If the Key property is Empty string, the entire collection of pictures is cleared.

If the Key is "OLEDragDropImage", it indicates the picture to be shown while the control performs OLE Drag and Drop operations. Currently, the  "OLEDragDropImage" has effect only for /COM version. In other words, you can specify a custom-sized picture rather than image of the dragging items, if you specify a picture with the name "OLEDragDropImage" ( no quotes included ).

 

Variant The HTMLPicture specifies the picture being associated to a key. It can be one of the followings: 
  • a string expression that indicates the path to the picture file, being loaded. 
  • a string expression that indicates the base64 encoded string that holds a picture object, Use the eximages tool to save your picture as base64 encoded format. 
  • A Picture object that indicates the picture being added or replaced. ( A Picture object implements IPicture interface ), 

If empty, the picture being associated to a key is removed. If the key already exists the new picture is replaced. If the key is not empty, and it doesn't not exist a new picture is added.

The HTMLPicture property handles a collection of custom size picture being displayed in the HTML captions, using the <img> tags. By default, the HTMLPicture collection is empty. Use the HTMLPicture property to add new pictures to be used in HTML captions. For instance, the HTMLPicture("pic1") = "c:\winnt\zapotec.bmp", loads the zapotec picture and associates the pic1 key to it. Any "<img>pic1</img>" sequence in HTML captions, displays the pic1 picture. On return, the HTMLPicture property retrieves a Picture object ( this implements the IPictureDisp interface ).

The following sample shows how to put a custom size picture in the column's header:

<CONTROL>.HTMLPicture("pic1") = "c:/temp/editors.gif"
<CONTROL>.HTMLPicture("pic2") = "c:/temp/editpaste.gif"

<COLUMN1>.HTMLCaption = "A <img>pic1</img>"
<COLUMN2>.HTMLCaption = "B <img>pic2</img>"
<COLUMN3>.HTMLCaption = "A <img>pic1</img> + B <img>pic2</img>"