SftDirectory 3.0 - ActiveX File/Folder Control

MouseIcon Sample (VB6)

This sample illustrates working with icons.

This is not an executable sample, so a complete project is not provided. These statements are intended to show the syntax used.

' A picture box is used to hold the icon for the MouseIcon property. A suitable
' icon has been defined in the picture box using its Picture property.
Set SftDirectory1.MouseIcon = Picture1.Picture
SftDirectory1.MousePointer = sftCustom