static bool ChooseASCOMCamera(BSTR *res)
{
DispatchObj chooser;
if (!chooser.Create(L"DriverHelper.Chooser"))
{
wxMessageBox(_("Failed to find the ASCOM Chooser. Make sure it is installed"), _("Error"), wxOK | wxICON_ERROR);
return false;
}
if (!chooser.PutProp(L"DeviceType", L"Camera"))
{
wxMessageBox(_("Failed to set the Chooser's type to Camera. Something is wrong with ASCOM"), _("Error"), wxOK | wxICON_ERROR);
return false;
}
// Look in Registry to see if there is a default
wxString wx_ProgID = pConfig->Profile.GetString("/camera/ASCOMlate/camera_id", _T(""));
BSTR bstr_ProgID = wxBasicString(wx_ProgID).Get();
Variant vchoice;
if (!chooser.InvokeMethod(&vchoice, L"Choose", bstr_ProgID))
{
wxMessageBox(_("Failed to run the Camera Chooser. Something is wrong with ASCOM"), _("Error"), wxOK | wxICON_ERROR);
return false;
}
if (SysStringLen(vchoice.bstrVal) == 0)
return false; // use hit cancel
// Save name of cam
pConfig->Profile.SetString("/camera/ASCOMlate/camera_id", vchoice.bstrVal);
*res = vchoice.bstrVal;
return true;
}
static bool GetDriverProgId(BSTR *progid, const wxString& choice)
{
if (IsChooser(choice))
{
if (!ChooseASCOMScope(progid))
return false;
}
else
{
wxString progidstr = s_progid[choice];
*progid = wxBasicString(progidstr).Get();
}
return true;
}
static bool ChooseASCOMScope(BSTR *res)
{
DispatchObj chooser;
if (!chooser.Create(L"DriverHelper.Chooser"))
{
Debug.AddLine("Chooser instantiate failed: " + ExcepMsg(chooser.Excep()));
wxMessageBox(_("Failed to find the ASCOM Chooser. Make sure it is installed"), _("Error"), wxOK | wxICON_ERROR);
return false;
}
if (!chooser.PutProp(L"DeviceType", L"Telescope"))
{
Debug.AddLine("Chooser put prop failed: " + ExcepMsg(chooser.Excep()));
wxMessageBox(_("Failed to set the Chooser's type to Telescope. Something is wrong with ASCOM"), _("Error"), wxOK | wxICON_ERROR);
return false;
}
// Look in Registry to see if there is a default
wxString wx_ProgID = pConfig->Global.GetString("/scope/ascom/ScopeID", _T(""));
BSTR bstr_ProgID = wxBasicString(wx_ProgID).Get();
Variant vchoice;
if (!chooser.InvokeMethod(&vchoice, L"Choose", bstr_ProgID))
{
wxMessageBox(_("Failed to run the Telescope Chooser. Something is wrong with ASCOM"), _("Error"), wxOK | wxICON_ERROR);
return false;
}
if (SysStringLen(vchoice.bstrVal) == 0)
return false; // use hit cancel
// Save name of scope
pConfig->Global.SetString("/scope/ascom/ScopeID", vchoice.bstrVal);
*res = vchoice.bstrVal;
return true;
}
WXDLLEXPORT BSTR wxConvertStringToOle(const wxString& str)
{
return wxBasicString(str).Get();
}
