Agilent Technologies R Series, User Manual

Page: 187 / 220

153 Appendix A: BenchCel ActiveX control
BenchCel Microplate Handling Workstation R-Series User Guide
Visual Basic example
LabwareNames = BenchCel.GetLabwareNames
For i = LBound(labwareNames) To UBound(labwareNames)
MsgBox labwareNames(i)
Next
VARIANT
EnumerateProfiles()
Description
Method to retrieve a list of defined profiles. The strings in this array are the
options that should be used for Initialize.
Parameters
None
Returns
An array of profile names.
Visual C++ example
VARIANT vPRofiles = m
_
BenchCel.EnumerateProfiles();
SAFEARRAY *psa = vProfiles.parray;
BSTR* bstrArray;
if
(FAILED(SafeArrayAccessData(psa,reinterpret
_
cast<void**>(
&bstrArray))))
{
VariantClear(&vProfiles);
return;
}
for (ULONG i = 0; i < psa->rgsabound[0].cElements; i++)
{
MessageBox(CString(bstrArray[i])));
}
SafeArrayUnaccessData(psa); VaraintClear(&vProfiles);
Visual Basic example
profileNames = BenchCel.EnumerateProfiles()
For i = LBound(profileNames) To UBound(profileNames)
MsgBox profileNames(i)
Next