OEM User's Guide

OEM External Specification
OEM User’s Guide520330-001
A-65
OEM Callback API (Adapter to OEM)
SetIcons
Use SetIcons to inform the OEM that the user has changed the default icon set in a
framework adapter. The OEM subsequently passes this update to all other adapters and
clients and modifies its own icon set if the Use Common Icons option is enabled.
Parameters
IconDirectoryName (input)
is the name of the directory containing the object and state images to use.
Return Value
0 if the OEM has accepted the call and handled the request (even if the icon set is
not updated)
Non-zero if the OEM cannot process the request
Considerations
If the Use Common Icons option is disabled, the OEM still passes the update
information to all clients and adapters. However, the OEM does not modify its own icon
set to utilize the new icons given in IconDirectoryName.
The adapter that called SetIcons subsequently receives a SetIcons call from the OEM;
the directory name passed is identical to that supplied on the initial call.
Example
Dim RC As Integer
' OEMServerCallbackObject was passed in a Popup.Add or
Object.Add call
RC = OEMServerCallbackObject.SetIcons 'C:\MyIcons'
In this example, the adapter sets the icon directory to C:\MyIcons.
Function SetIcons(IconDirectoryName As String) As Integer