STDMETHODIMP CVisCalibrate::get_pos(VARIANT *pVal)
{
double tmp[2];
if(tCount>=0 && tCount<tN){ tmp[0]=xscr[tCount]; tmp[1]=yscr[tCount]; }
else { tmp[0]=-1; tmp[1]=-1;}
VariantFromArray(2,tmp,pVal);
return S_OK;
}
void
CVisCalibrate::presentTarget()
{
HRESULT hr;
VARIANT pVal;
double pos[2];
pos[0]=xscr[tCount];
pos[1]=yscr[tCount];
// Put Data to the VisDisk
VariantFromArray(2,pos,&pVal);
hr = pID->put_pos( pVal );
VariantClear(&pVal);
// Ready for Next Position
tReady=1;
}
STDMETHODIMP CVisText::get_scale(VARIANT *pVal)
{
double tmp[2] = {ScaleX, ScaleY};
VariantFromArray(2,tmp,pVal);
return S_OK;
}
STDMETHODIMP CVisText::get_size(VARIANT *pVal)
{
double tmp[2] = {Length, Height};
VariantFromArray(2,tmp,pVal);
return S_OK;
}
STDMETHODIMP CVisText::get_color(VARIANT *pVal)
{
double tmp[3] = {Color[0], Color[1], Color[2]};
VariantFromArray(3,tmp,pVal);
return S_OK;
}
STDMETHODIMP CVisObject::get_pos(VARIANT *pVal)
{
double tmp[2]={X,Y};
VariantFromArray(2,tmp,pVal);
return S_OK;
}
// Counter Size -- [0 1] wrt screen edge
STDMETHODIMP CVisWindow::get_countersize(VARIANT *pVal)
{
VariantFromArray(2,counterSize,pVal);
return S_OK;
}
// Counter Pos -- [0 1] wrt screen edge
STDMETHODIMP CVisWindow::get_counterpos(VARIANT *pVal)
{
VariantFromArray(2,counterPos,pVal);
return S_OK;
}
