void GribRequestSetting::OnTopChange(wxCommandEvent &event)
{
ApplyRequestConfig( m_pResolution->GetCurrentSelection(), m_pInterval->GetCurrentSelection(), m_pTimeRange->GetCurrentSelection() );
m_cMovingGribEnabled->Show( m_pMailTo->GetCurrentSelection() == SAILDOCS );
if(m_AllowSend) m_MailImage->SetValue( WriteMail() );
SetMailImageSize();
}
void GribRequestSetting::OnModelChange(wxCommandEvent &event)
{
ApplyRequestConfig( m_pModel->GetCurrentSelection(), m_pResolution->GetCurrentSelection() );
//permit to send a new message
m_MailImage->SetForegroundColour(wxColor( 0, 0, 0 ));
m_bSend->Show();
m_MailImage->SetLabel( WriteMail() );
Fit();
}
void GribRequestSetting::InitRequestConfig()
{
long i,j;
( (wxString) m_RequestConfigBase.GetChar(2) ).ToLong( &i );
( (wxString) m_RequestConfigBase.GetChar(3) ).ToLong( &j );
ApplyRequestConfig( i, j );
( (wxString) m_RequestConfigBase.GetChar(4) ).ToLong( &j );
m_pInterval->SetSelection( j );
( (wxString) m_RequestConfigBase.GetChar(5) ).ToLong( &j );
m_pTimeRange->SetSelection( j );
m_pWind->Enable( false );
m_pPress->Enable( false );
m_MailImage->SetLabel( WriteMail() );
Fit();
}
//----------------------------------------------------------------------------------------------------------
// GRIB Request Implementation
//----------------------------------------------------------------------------------------------------------
void GribRequestSetting::InitRequestConfig()
{
DimeWindow( this ); //aplly global colours scheme
wxFileConfig *pConf = GetOCPNConfigObject();
if(pConf) {
pConf->SetPath ( _T( "/PlugIns/GRIB" ) );
wxString l;
int m;
pConf->Read ( _T( "MailRequestConfig" ), &m_RequestConfigBase, _T( "000220XX........0" ) );
pConf->Read ( _T( "MailSenderAddress" ), &l, _T("") );
m_pSenderAddress->ChangeValue( l );
pConf->Read ( _T( "MailRequestAddresses" ), &m_MailToAddresses, _T("[email protected];[email protected]") );
pConf->Read ( _T( "ZyGribLogin" ), &l, _T("") );
m_pLogin->ChangeValue( l );
pConf->Read ( _T( "ZyGribCode" ), &l, _T("") );
m_pCode->ChangeValue( l );
pConf->Read ( _T( "SendMailMethod" ), &m_SendMethod, 0 );
pConf->Read ( _T( "MovingGribSpeed" ), &m, 0 );
m_sMovingSpeed->SetValue( m );
pConf->Read ( _T( "MovingGribCourse" ), &m, 0 );
m_sMovingCourse->SetValue( m );
//if GriDataConfig has been corrupted , take the standard one to fix a crash
if( m_RequestConfigBase.Len() != wxString (_T( "000220XX.............." ) ).Len() )
m_RequestConfigBase = _T( "000220XX.............." );
}
//populate model, mail to, waves model choices
wxString s1[] = {_T("GFS"),_T("COAMPS"),_T("RTOFS")};
for( unsigned int i= 0; i<(sizeof(s1) / sizeof(wxString));i++)
m_pModel->Append( s1[i] );
wxString s2[] = {_T("Saildocs"),_T("zyGrib")};
for( unsigned int i= 0; i<(sizeof(s2) / sizeof(wxString));i++)
m_pMailTo->Append( s2[i] );
wxString s3[] = {_T("WW3-GLOBAL"),_T("WW3-MEDIT")};
for( unsigned int i= 0; i<(sizeof(s3) / sizeof(wxString));i++)
m_pWModel->Append( s3[i] );
m_rButtonYes->SetLabel(_("Send"));
m_rButtonApply->SetLabel(_("Save"));
m_tResUnit->SetLabel(wxString::Format( _T("\u00B0")));
m_sCourseUnit->SetLabel(wxString::Format( _T("\u00B0")));
//add tooltips
m_pSenderAddress->SetToolTip(_("Address used to send request eMail. (Mandatory for LINUX)"));
m_pLogin->SetToolTip(_("This is your zyGrib's forum access Login"));
m_pCode->SetToolTip(_("Get this Code in zyGrib's forum ( This is not your password! )"));
m_sMovingSpeed->SetToolTip(_("Enter your forescasted Speed (in Knots)"));
m_sMovingCourse->SetToolTip(_("Enter your forecasted Course"));
long i,j,k;
( (wxString) m_RequestConfigBase.GetChar(0) ).ToLong( &i ); //MailTo
m_pMailTo->SetSelection(i);
( (wxString) m_RequestConfigBase.GetChar(1) ).ToLong( &i ); //Model
m_pModel->SetSelection(i);
m_cMovingGribEnabled->SetValue(m_RequestConfigBase.GetChar(16) == 'X' );//Moving Grib
( (wxString) m_RequestConfigBase.GetChar(2) ).ToLong( &i ); //Resolution
( (wxString) m_RequestConfigBase.GetChar(3) ).ToLong( &j ); //interval
( (wxString) m_RequestConfigBase.GetChar(4) ).ToLong( &k, 16 ); //Time Range
k--; // range max = 2 to 16 stored in hexa from 1 to f
#ifdef __WXMSW__ //show / hide sender elemants as necessary
m_pSenderSizer->ShowItems(false);
#else
if(m_SendMethod == 0 )
m_pSenderSizer->ShowItems(false);
else
m_pSenderSizer->ShowItems(true); //possibility to use "sendmail" method with Linux
#endif
ApplyRequestConfig( i, j ,k);
( (wxString) m_RequestConfigBase.GetChar(5) ).ToLong( &j ); //Waves model
m_pWModel->SetSelection( j );
m_pWind->Enable( false ); //always selected if available
m_pPress->Enable( false );
m_AllowSend = true;
m_MailImage->SetValue( WriteMail() );
SetMailImageSize();
}
void GribRequestSetting::InitRequestConfig()
{
wxFileConfig *pConf = GetOCPNConfigObject();
if(pConf) {
pConf->SetPath ( _T( "/PlugIns/GRIB" ) );
wxString l;
int m;
pConf->Read ( _T( "MailRequestConfig" ), &m_RequestConfigBase, _T( "000220XX........0" ) );
pConf->Read ( _T( "MailSenderAddress" ), &l, _T("") );
m_pSenderAddress->ChangeValue( l );
pConf->Read ( _T( "MailRequestAddresses" ), &m_MailToAddresses, _T("[email protected];[email protected]") );
pConf->Read ( _T( "ZyGribLogin" ), &l, _T("") );
m_pLogin->ChangeValue( l );
pConf->Read ( _T( "ZyGribCode" ), &l, _T("") );
m_pCode->ChangeValue( l );
pConf->Read ( _T( "SendMailMethod" ), &m_SendMethod, 0 );
pConf->Read ( _T( "MovingGribSpeed" ), &m, 0 );
m_sMovingSpeed->SetValue( m );
pConf->Read ( _T( "MovingGribCourse" ), &m, 0 );
m_sMovingCourse->SetValue( m );
m_cManualZoneSel->SetValue( m_SavedZoneSelMode != AUTO_SELECTION ); //has been read in GriUbICtrlBar dialog implementation or updated previously
m_cUseSavedZone->SetValue( m_SavedZoneSelMode == SAVED_SELECTION );
fgZoneCoordinatesSizer->ShowItems( m_SavedZoneSelMode != AUTO_SELECTION );
m_cUseSavedZone->Show( m_SavedZoneSelMode != AUTO_SELECTION );
if( m_cManualZoneSel->GetValue() ) {
pConf->Read ( _T( "RequestZoneMaxLat" ), &m, 0 );
m_spMaxLat->SetValue( m );
pConf->Read ( _T( "RequestZoneMinLat" ), &m, 0 );
m_spMinLat->SetValue( m );
pConf->Read ( _T( "RequestZoneMaxLon" ), &m, 0 );
m_spMaxLon->SetValue( m );
pConf->Read ( _T( "RequestZoneMinLon" ), &m, 0 );
m_spMinLon->SetValue( m );
SetCoordinatesText();
}
//if GriDataConfig has been corrupted , take the standard one to fix a crash
if( m_RequestConfigBase.Len() != wxString (_T( "000220XX.............." ) ).Len() )
m_RequestConfigBase = _T( "000220XX.............." );
}
//populate model, mail to, waves model choices
wxString s1[] = {_T("GFS"),_T("COAMPS"),_T("RTOFS")};
for( unsigned int i= 0; i<(sizeof(s1) / sizeof(wxString));i++)
m_pModel->Append( s1[i] );
wxString s2[] = {_T("Saildocs"),_T("zyGrib")};
for( unsigned int i= 0; i<(sizeof(s2) / sizeof(wxString));i++)
m_pMailTo->Append( s2[i] );
wxString s3[] = {_T("WW3-GLOBAL"),_T("WW3-MEDIT")};
for( unsigned int i= 0; i<(sizeof(s3) / sizeof(wxString));i++)
m_pWModel->Append( s3[i] );
m_rButtonYes->SetLabel(_("Send"));
m_rButtonApply->SetLabel(_("Save"));
m_tResUnit->SetLabel(wxString::Format( _T("\u00B0")));
m_sCourseUnit->SetLabel(wxString::Format( _T("\u00B0")));
//Set wxSpinCtrl sizing
int w,h;
GetTextExtent( _T("-360"), &w, &h, 0, 0, OCPNGetFont(_("Dialog"), 10)); // optimal text control size
w += 30;
h += 4;
m_sMovingSpeed->SetMinSize( wxSize(w, h) );
m_sMovingCourse->SetMinSize( wxSize(w, h) );
m_spMaxLat->SetMinSize( wxSize(w, h) );
m_spMinLat->SetMinSize( wxSize(w, h) );
m_spMaxLon->SetMinSize( wxSize(w, h) );
m_spMinLon->SetMinSize( wxSize(w, h) );
//add tooltips
m_pSenderAddress->SetToolTip(_("Address used to send request eMail. (Mandatory for LINUX)"));
m_pLogin->SetToolTip(_("This is your zyGrib's forum access Login"));
m_pCode->SetToolTip(_("Get this Code in zyGrib's forum ( This is not your password! )"));
m_sMovingSpeed->SetToolTip(_("Enter your forescasted Speed (in Knots)"));
m_sMovingCourse->SetToolTip(_("Enter your forecasted Course"));
long i,j,k;
( (wxString) m_RequestConfigBase.GetChar(0) ).ToLong( &i ); //MailTo
m_pMailTo->SetSelection(i);
( (wxString) m_RequestConfigBase.GetChar(1) ).ToLong( &i ); //Model
m_pModel->SetSelection(i);
m_cMovingGribEnabled->SetValue(m_RequestConfigBase.GetChar(16) == 'X' );//Moving Grib
( (wxString) m_RequestConfigBase.GetChar(2) ).ToLong( &i ); //Resolution
( (wxString) m_RequestConfigBase.GetChar(3) ).ToLong( &j ); //interval
( (wxString) m_RequestConfigBase.GetChar(4) ).ToLong( &k, 16 ); //Time Range
k--; // range max = 2 to 16 stored in hexa from 1 to f
#ifdef __WXMSW__ //show / hide sender elemants as necessary
m_pSenderSizer->ShowItems(false);
#else
if(m_SendMethod == 0 )
m_pSenderSizer->ShowItems(false);
else
m_pSenderSizer->ShowItems(true); //possibility to use "sendmail" method with Linux
#endif
m_tMouseEventTimer.Connect(wxEVT_TIMER, wxTimerEventHandler( GribRequestSetting::OnMouseEventTimer ), NULL, this);
m_RenderZoneOverlay = 0;
ApplyRequestConfig( i, j ,k);
( (wxString) m_RequestConfigBase.GetChar(5) ).ToLong( &j ); //Waves model
m_pWModel->SetSelection( j );
m_pWind->Enable( false ); //always selected if available
m_pPress->Enable( false );
DimeWindow( this ); //aplly global colours scheme
m_AllowSend = true;
m_MailImage->SetValue( WriteMail() );
}
