#include <Equalization.h>

Inheritance diagram for EditCurvesDialog:

Public Member Functions
	EditCurvesDialog (wxWindow parent, EffectEqualization effect, int position)

	~EditCurvesDialog ()

Public Member Functions inherited from wxDialogWrapper
	wxDialogWrapper ()

	wxDialogWrapper (wxWindow *parent, wxWindowID id, const wxString &title, const wxPoint &pos=wxDefaultPosition, const wxSize &size=wxDefaultSize, long style=wxDEFAULT_DIALOG_STYLE, const wxString &name=_("Dialog"))

bool	Create (wxWindow *parent, wxWindowID id, const wxString &title, const wxPoint &pos=wxDefaultPosition, const wxSize &size=wxDefaultSize, long style=wxDEFAULT_DIALOG_STYLE, const wxString &name=_("Dialog"))

Public Member Functions inherited from wxTabTraversalWrapper< wxDialog >
	wxTabTraversalWrapper (Args &&...args)

	wxTabTraversalWrapper (const wxTabTraversalWrapper &)=delete

	wxTabTraversalWrapper (wxTabTraversalWrapper &&)=delete

wxTabTraversalWrapper &	operator= (const wxTabTraversalWrapper &)=delete

wxTabTraversalWrapper &	operator= (wxTabTraversalWrapper &&)=delete

Private Types
enum	EQCurvesDialogControls { CurvesListID = 11000, UpButtonID, DownButtonID, RenameButtonID, DeleteButtonID, ImportButtonID, ExportButtonID, LibraryButtonID, DefaultsButtonID }

Private Member Functions
void	Populate ()
	Creates the dialog and its contents. More...

void	PopulateOrExchange (ShuttleGui &S)
	Defines the dialog and does data exchange with it. More...

void	PopulateList (int position)

void	OnUp (wxCommandEvent &event)

void	OnDown (wxCommandEvent &event)

long	GetPreviousItem (long item)

void	OnRename (wxCommandEvent &event)

void	OnDelete (wxCommandEvent &event)

void	OnImport (wxCommandEvent &event)

void	OnExport (wxCommandEvent &event)

void	OnLibrary (wxCommandEvent &event)

void	OnDefaults (wxCommandEvent &event)

void	OnOK (wxCommandEvent &event)

void	OnListSelectionChange (wxListEvent &event)

Private Attributes
wxListCtrl *	mList

EQCurveArray	mEditCurves

wxWindow *	mParent

EffectEqualization *	mEffect

int	mPosition

Detailed Description

Definition at line 335 of file Equalization.h.

Member Enumeration Documentation

enum EditCurvesDialog::EQCurvesDialogControls

private

Enumerator
CurvesListID
UpButtonID
DownButtonID
RenameButtonID
DeleteButtonID
ImportButtonID
ExportButtonID
LibraryButtonID
DefaultsButtonID

Definition at line 343 of file Equalization.h.

    {
       CurvesListID = 11000,
       UpButtonID,
       DownButtonID,
       RenameButtonID,
       DeleteButtonID,
       ImportButtonID,
       ExportButtonID,
       LibraryButtonID,
       DefaultsButtonID
    };

Constructor & Destructor Documentation

EditCurvesDialog::OnListSelectionChange EditCurvesDialog::EditCurvesDialog	(	wxWindow *	parent,
		EffectEqualization *	effect,
		int	position
	)

Definition at line 3127 of file Equalization.cpp.

References _(), and mParent.

                                                                                               :
 wxDialogWrapper(parent, wxID_ANY, _("Manage Curves List"),
          wxDefaultPosition, wxDefaultSize,
          wxDEFAULT_DIALOG_STYLE | wxRESIZE_BORDER)
 {
    SetLabel(_("Manage Curves"));         // Provide visual label
    SetName(_("Manage Curves List"));     // Provide audible label
    mParent = parent;
    mEffect = effect;
    mPosition = position;
    // make a copy of mEffect->mCurves here to muck about with.
    mEditCurves.clear();
    for (unsigned int i = 0; i < mEffect->mCurves.size(); i++)
    {
       mEditCurves.push_back(mEffect->mCurves[i].Name);
       mEditCurves[i].points = mEffect->mCurves[i].points;
    }
 
    Populate();
    SetMinSize(GetSize());
 }

EditCurvesDialog::~EditCurvesDialog ( )

Definition at line 3149 of file Equalization.cpp.

3150 {

3151 }

Member Function Documentation

long EditCurvesDialog::GetPreviousItem ( long item )

private

Definition at line 3281 of file Equalization.cpp.

References mList.

Referenced by OnDown().

 {
    long lastItem = -1;
    long itemTemp = mList->GetNextItem(-1, wxLIST_NEXT_ALL,
       wxLIST_STATE_SELECTED);
    while( (itemTemp != -1) && (itemTemp < item) )
    {
       lastItem = itemTemp;
       itemTemp = mList->GetNextItem(itemTemp, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    }
    return lastItem;
 }

void EditCurvesDialog::OnDefaults ( wxCommandEvent & event )

private

Definition at line 3562 of file Equalization.cpp.

References EffectEqualization::LoadCurves(), EffectEqualization::mCurves, mEditCurves, mEffect, and PopulateList().

 {
    EQCurveArray temp;
    temp = mEffect->mCurves;
    // we expect this to fail in LoadCurves (due to a lack of path) and handle that there
    mEffect->LoadCurves( wxT("EQDefaultCurves.xml") );
    mEditCurves = mEffect->mCurves;
    mEffect->mCurves = temp;
    PopulateList(0);  // update the EditCurvesDialog dialog
 }

void EditCurvesDialog::OnDelete ( wxCommandEvent & event )

private

Definition at line 3406 of file Equalization.cpp.

References _(), Effect::DefaultMessageBoxStyle, mEditCurves, mEffect, mList, and PopulateList().

 {
    // We could could count them here
    // And then put in a 'Delete N items?' prompt.
 
 #if 0 // 'one at a time' prompt code
    // Get the first one to be deleted
    long item = mList->GetNextItem(-1, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    // Take care, mList and mEditCurves will get out of sync as curves are deleted
    int deleted = 0;
    long highlight = -1;
 
    while(item >= 0)
    {
       if(item == mList->GetItemCount()-1)   //unnamed
       {
          mEffect->Effect::MessageBox(_("You cannot delete the 'unnamed' curve."),
              wxOK | wxCENTRE, _("Can't delete 'unnamed'"));
       }
       else
       {
          // Create the prompt
          wxString quest;
          quest = wxString::Format(_("Delete '%s'?"),
                                   mEditCurves[ item-deleted ].Name);
 
          // Ask for confirmation before removal
          int ans = mEffect->Effect::MessageBox( quest, wxYES_NO | wxCENTRE, _("Confirm Deletion") );
          if( ans == wxYES )
          {  // Remove the curve from the array
             mEditCurves.RemoveAt( item-deleted );
             deleted++;
          }
          else
             highlight = item-deleted;  // if user presses 'No', select that curve
       }
       // get next selected item
       item = mList->GetNextItem(item, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    }
 
    if(highlight == -1)
       PopulateList(mEditCurves.GetCount()-1);   // set 'unnamed' as the selected curve
    else
       PopulateList(highlight);   // user said 'No' to deletion
 #else // 'DELETE all N' code
    int count = mList->GetSelectedItemCount();
    long item = mList->GetNextItem(-1, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    // Create the prompt
    wxString quest;
    if( count > 1 )
       quest = wxString::Format(_("Delete %d items?"), count);
    else
       if( count == 1 )
          quest = wxString::Format(_("Delete '%s'?"), mEditCurves[ item ].Name);
       else
          return;
    // Ask for confirmation before removal
    int ans = mEffect->Effect::MessageBox( quest, wxYES_NO | wxCENTRE, _("Confirm Deletion") );
    if( ans == wxYES )
    {  // Remove the curve(s) from the array
       // Take care, mList and mEditCurves will get out of sync as curves are deleted
       int deleted = 0;
       while(item >= 0)
       {
          // TODO: Migrate to the standard "Manage" dialog.
          if(item == mList->GetItemCount()-1)   //unnamed
          {
             mEffect->Effect::MessageBox(_("You cannot delete the 'unnamed' curve, it is special."),
                                         Effect::DefaultMessageBoxStyle,
                                         _("Can't delete 'unnamed'"));
          }
          else
          {
             mEditCurves.erase( mEditCurves.begin() + item - deleted );
             deleted++;
          }
          item = mList->GetNextItem(item, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
       }
       PopulateList(mEditCurves.size() - 1);   // set 'unnamed' as the selected curve
    }
 #endif
 }

void EditCurvesDialog::OnDown ( wxCommandEvent & event )

private

Definition at line 3250 of file Equalization.cpp.

References GetPreviousItem(), mEditCurves, mList, EQCurve::Name, and EQCurve::points.

 {  // looks harder than OnUp as we need to seek backwards up the list, hence GetPreviousItem
    long item = GetPreviousItem(mList->GetItemCount());
    if( item == -1 )
       return;  // nothing selected
    int state;
    while( item != -1 )
    {
       if( (item != mList->GetItemCount()-1) && (item != mList->GetItemCount()-2) )
       {  // can't move 'unnamed' down, or the one above it
          state = mList->GetItemState(item+1, wxLIST_STATE_SELECTED);
          if ( state != wxLIST_STATE_SELECTED )
          { // swap this with one below but only if it isn't selected
             EQCurve temp(wxT("temp"));
             temp.Name = mEditCurves[item].Name;
             temp.points = mEditCurves[item].points;
             mEditCurves[item].Name = mEditCurves[item+1].Name;
             mEditCurves[item].points = mEditCurves[item+1].points;
             mEditCurves[item+1].Name = temp.Name;
             mEditCurves[item+1].points = temp.points;
             wxString sTemp = mList->GetItemText(item);
             mList->SetItem(item, 0, mList->GetItemText(item+1));
             mList->SetItem(item+1, 0, sTemp);
             mList->SetItemState(item, 0, wxLIST_STATE_SELECTED);
             mList->SetItemState(item+1, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED);
          }
       }
       item = GetPreviousItem(item);
    }
 }

void EditCurvesDialog::OnExport ( wxCommandEvent & event )

private

Definition at line 3509 of file Equalization.cpp.

References _(), FileNames::DataDir(), Effect::DefaultMessageBoxStyle, FileDialog::GetPath(), EffectEqualization::mCurves, mEditCurves, mEffect, mList, EffectEqualization::SaveCurves(), and FileDialog::ShowModal().

 {
    FileDialogWrapper filePicker(this, _("Export EQ curves as..."), FileNames::DataDir(), wxT(""), wxT("*.XML"), wxFD_SAVE | wxFD_OVERWRITE_PROMPT | wxRESIZE_BORDER);   // wxFD_CHANGE_DIR?
    wxString fileName = wxT("");
    if( filePicker.ShowModal() == wxID_CANCEL)
       return;
    else
       fileName = filePicker.GetPath();
 
    EQCurveArray temp;
    temp = mEffect->mCurves;   // backup the parent's curves
    EQCurveArray exportCurves;   // Copy selected curves to export
    exportCurves.clear();
    long item = mList->GetNextItem(-1, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    int i=0;
    while(item >= 0)
    {
       if(item != mList->GetItemCount()-1)   // not 'unnamed'
       {
          exportCurves.push_back(mEditCurves[item].Name);
          exportCurves[i].points = mEditCurves[item].points;
          i++;
       }
       else
          mEffect->Effect::MessageBox(_("You cannot export 'unnamed' curve, it is special."),
                             Effect::DefaultMessageBoxStyle,
                             _("Cannot Export 'unnamed'"));
       // get next selected item
       item = mList->GetNextItem(item, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    }
    if(i>0)
    {
       mEffect->mCurves = exportCurves;
       mEffect->SaveCurves(fileName);
       mEffect->mCurves = temp;
       wxString message;
       message.Printf(_("%d curves exported to %s"), i, fileName);
       mEffect->Effect::MessageBox(message,
                                   Effect::DefaultMessageBoxStyle,
                                   _("Curves exported"));
    }
    else
       mEffect->Effect::MessageBox(_("No curves exported"),
                                   Effect::DefaultMessageBoxStyle,
                                   _("No curves exported"));
 }

void EditCurvesDialog::OnImport ( wxCommandEvent & event )

private

Definition at line 3489 of file Equalization.cpp.

References _(), FileNames::DataDir(), FileDialog::GetPath(), EffectEqualization::LoadCurves(), EffectEqualization::mCurves, mEditCurves, mEffect, PopulateList(), and FileDialog::ShowModal().

 {
    FileDialogWrapper filePicker(this, _("Choose an EQ curve file"), FileNames::DataDir(), wxT(""), _("xml files (*.xml;*.XML)|*.xml;*.XML"));
    wxString fileName = wxT("");
    if( filePicker.ShowModal() == wxID_CANCEL)
       return;
    else
       fileName = filePicker.GetPath();
    // Use EqualizationDialog::LoadCurves to read into (temporary) mEditCurves
    // This may not be the best OOP way of doing it, but I don't know better (MJS)
    EQCurveArray temp;
    temp = mEffect->mCurves;   // temp copy of the main dialog curves
    mEffect->mCurves = mEditCurves;  // copy EditCurvesDialog to main interface
    mEffect->LoadCurves(fileName, true);   // use main interface to load imported curves
    mEditCurves = mEffect->mCurves;  // copy back to this interface
    mEffect->mCurves = temp;   // and reset the main interface how it was
    PopulateList(0);  // update the EditCurvesDialog dialog
    return;
 }

void EditCurvesDialog::OnLibrary ( wxCommandEvent & event )

private

Definition at line 3556 of file Equalization.cpp.

 {
    // full path to wiki.
    wxLaunchDefaultBrowser(wxT("https://wiki.audacityteam.org/wiki/EQCurvesDownload"));
 }

void EditCurvesDialog::OnListSelectionChange ( wxListEvent & event )

private

Definition at line 3601 of file Equalization.cpp.

References DeleteButtonID, DownButtonID, mList, RenameButtonID, and UpButtonID.

 {
    const bool enable = mList->GetSelectedItemCount() > 0;
    static const int ids[] = {
       UpButtonID,
       DownButtonID,
       RenameButtonID,
       DeleteButtonID,
    };
    for (auto id : ids)
       FindWindowById(id, this)->Enable(enable);
 }

void EditCurvesDialog::OnOK ( wxCommandEvent & event )

private

Definition at line 3573 of file Equalization.cpp.

References FileNames::DataDir(), EffectEqualization::LoadCurves(), EffectEqualization::mCurves, mEditCurves, mEffect, mList, Effect::mUIParent, EffectEqualization::SaveCurves(), and EffectEqualization::setCurve().

 {
    // Make a backup of the current curves
    wxString backupPlace = wxFileName( FileNames::DataDir(), wxT("EQBackup.xml") ).GetFullPath();
    mEffect->SaveCurves(backupPlace);
    // Load back into the main dialog
    mEffect->mCurves.clear();
    for (unsigned int i = 0; i < mEditCurves.size(); i++)
    {
       mEffect->mCurves.push_back(mEditCurves[i].Name);
       mEffect->mCurves[i].points = mEditCurves[i].points;
    }
    mEffect->SaveCurves();
    mEffect->LoadCurves();
 //   mEffect->CreateChoice();
    wxGetTopLevelParent(mEffect->mUIParent)->Layout();
 //   mEffect->mUIParent->Layout();
 
    // Select something sensible
    long item = mList->GetNextItem(-1,
       wxLIST_NEXT_ALL,
       wxLIST_STATE_SELECTED);
    if (item == -1)
       item = mList->GetItemCount()-1;   // nothing selected, default to 'unnamed'
    mEffect->setCurve(item);
    EndModal(true);
 }

void EditCurvesDialog::OnRename ( wxCommandEvent & event )

private

Definition at line 3295 of file Equalization.cpp.

References _(), mEditCurves, mEffect, mList, name, and PopulateList().

 {
    wxString name;
    int numCurves = mEditCurves.size();
    int curve = 0;
 
    // Setup list of characters that aren't allowed
    wxArrayString exclude;
    exclude.Add( wxT("<") );
    exclude.Add( wxT(">") );
    exclude.Add( wxT("'") );
    exclude.Add( wxT("\"") );
 
    // Get the first one to be renamed
    long item = mList->GetNextItem(-1, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    long firstItem = item;  // for reselection with PopulateList
    while(item >= 0)
    {
       // Prompt the user until a valid name is enter or cancelled
       bool overwrite = false;
       bool bad = true;
       while( bad )   // Check for an unacceptable duplicate
       {   // Show the dialog and bail if the user cancels
          bad = false;
          // build the dialog
          AudacityTextEntryDialog dlg( this,
             wxString::Format( _("Rename '%s' to..."), mEditCurves[ item ].Name ),
             _("Rename...") );
          dlg.SetTextValidator( wxFILTER_EXCLUDE_CHAR_LIST );
          dlg.SetName(
             wxString::Format( _("Rename '%s'"), mEditCurves[ item ].Name ) );
          wxTextValidator *tv = dlg.GetTextValidator();
          tv->SetExcludes( exclude );   // Tell the validator about excluded chars
          if( dlg.ShowModal() == wxID_CANCEL )
          {
             bad = true;
             break;
          }
 
          // Extract the name from the dialog
          name = dlg.GetValue();
 
          // Search list of curves for a duplicate name
          for( curve = 0; curve < numCurves; curve++ )
          {
             wxString temp = mEditCurves[ curve ].Name;
             if( name.IsSameAs( mEditCurves[ curve ].Name )) // case sensitive
             {
                bad = true;
                if( curve == item )  // trying to rename a curve with the same name
                {
                   mEffect->Effect::MessageBox( _("Name is the same as the original one"), wxOK, _("Same name") );
                   break;
                }
                int answer = mEffect->Effect::MessageBox(
                   wxString::Format( _("Overwrite existing curve '%s'?"), name ),
                   wxYES_NO, _("Curve exists") );
                if (answer == wxYES)
                {
                   bad = false;
                   overwrite = true; // we are going to overwrite the one with this name
                   break;
                }
             }
          }
          if( name == wxT("") || name == wxT("unnamed") )
             bad = true;
       }
 
       // if bad, we cancelled the rename dialog, so nothing to do.
       if( bad == true )
          ;
       else if(overwrite){
          // Overwrite another curve.
          // JKC: because 'overwrite' is true, 'curve' is the number of the curve that
          // we are about to overwrite.
          mEditCurves[ curve ].Name = name;
          mEditCurves[ curve ].points = mEditCurves[ item ].points;
          // if renaming the unnamed item, then select it,
          // otherwise get rid of the item we've renamed.
          if( item == (numCurves-1) )
             mList->SetItem(curve, 0, name);
          else
          {
             mEditCurves.erase( mEditCurves.begin() + item );
             numCurves--;
          }
       }
       else if( item == (numCurves-1) ) // renaming 'unnamed'
       {  // Create a NEW entry
          mEditCurves.push_back( EQCurve( wxT("unnamed") ) );
          // Copy over the points
          mEditCurves[ numCurves ].points = mEditCurves[ numCurves - 1 ].points;
          // Give the original unnamed entry the NEW name
          mEditCurves[ numCurves - 1 ].Name = name;
          numCurves++;
       }
       else  // just rename (the 'normal' case)
       {
          mEditCurves[ item ].Name = name;
          mList->SetItem(item, 0, name);
       }
       // get next selected item
       item = mList->GetNextItem(item, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    }
 
    PopulateList(firstItem);  // Note: only saved to file when you OK out of the dialog
    return;
 }

void EditCurvesDialog::OnUp ( wxCommandEvent & event )

private

Definition at line 3213 of file Equalization.cpp.

References _(), Effect::DefaultMessageBoxStyle, mEditCurves, mEffect, mList, EQCurve::Name, and EQCurve::points.

 {
    long item = mList->GetNextItem(-1, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    if ( item == -1 )
       return;  // no items selected
    if( item == 0 )
       item = mList->GetNextItem(item, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED); // top item selected, can't move up
    int state;
    while( item != -1 )
    {
       if ( item == mList->GetItemCount()-1)
       {  // 'unnamed' always stays at the bottom
          mEffect->Effect::MessageBox(_("'unnamed' always stays at the bottom of the list"),
                             Effect::DefaultMessageBoxStyle,
                             _("'unnamed' is special"));   // these could get tedious!
          return;
       }
       state = mList->GetItemState(item-1, wxLIST_STATE_SELECTED);
       if ( state != wxLIST_STATE_SELECTED )
       { // swap this with one above but only if it isn't selected
          EQCurve temp(wxT("temp"));
          temp.Name = mEditCurves[item].Name;
          temp.points = mEditCurves[item].points;
          mEditCurves[item].Name = mEditCurves[item-1].Name;
          mEditCurves[item].points = mEditCurves[item-1].points;
          mEditCurves[item-1].Name = temp.Name;
          mEditCurves[item-1].points = temp.points;
          wxString sTemp = mList->GetItemText(item);
          mList->SetItem(item, 0, mList->GetItemText(item-1));
          mList->SetItem(item-1, 0, sTemp);
          mList->SetItemState(item, 0, wxLIST_STATE_SELECTED);
          mList->SetItemState(item-1, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED);
       }
       item = mList->GetNextItem(item, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
    }
 }

void EditCurvesDialog::Populate ( )

private

Creates the dialog and its contents.

Definition at line 3154 of file Equalization.cpp.

References eIsCreating, and PopulateOrExchange().

 {
    //------------------------- Main section --------------------
    ShuttleGui S(this, eIsCreating);
    PopulateOrExchange(S);
    // ----------------------- End of main section --------------
 }

void EditCurvesDialog::PopulateList ( int position )

private

Definition at line 3198 of file Equalization.cpp.

References mEditCurves, and mList.

Referenced by OnDefaults(), OnDelete(), OnImport(), OnRename(), and PopulateOrExchange().

 {
    mList->DeleteAllItems();
    for (unsigned int i = 0; i < mEditCurves.size(); i++)
       mList->InsertItem(i, mEditCurves[i].Name);
    mList->SetColumnWidth(0, wxLIST_AUTOSIZE);
    int curvesWidth = mList->GetColumnWidth(0);
    mList->SetColumnWidth(0, wxLIST_AUTOSIZE_USEHEADER);
    int headerWidth = mList->GetColumnWidth(0);
    mList->SetColumnWidth(0, wxMax(headerWidth, curvesWidth));
    // use 'position' to set focus
    mList->EnsureVisible(position);
    mList->SetItemState(position, wxLIST_STATE_SELECTED|wxLIST_STATE_FOCUSED, wxLIST_STATE_SELECTED|wxLIST_STATE_FOCUSED);
 }

void EditCurvesDialog::PopulateOrExchange ( ShuttleGui & S )

private

Defines the dialog and does data exchange with it.

Definition at line 3163 of file Equalization.cpp.

References _(), ShuttleGuiBase::AddButton(), ShuttleGuiBase::AddConstTextBox(), ShuttleGuiBase::AddListControlReportMode(), ShuttleGui::AddStandardButtons(), CurvesListID, DefaultsButtonID, DeleteButtonID, DownButtonID, ShuttleGuiBase::EndHorizontalLay(), ShuttleGuiBase::EndStatic(), ShuttleGuiBase::EndVerticalLay(), ExportButtonID, ShuttleGui::Id(), ImportButtonID, LibraryButtonID, mList, mPosition, PopulateList(), RenameButtonID, ShuttleGuiBase::SetStyle(), ShuttleGuiBase::StartHorizontalLay(), ShuttleGuiBase::StartStatic(), ShuttleGuiBase::StartVerticalLay(), and UpButtonID.

Referenced by Populate().

 {
    S.StartHorizontalLay(wxEXPAND);
    {
       S.StartStatic(_("&Curves"), 1);
       {
          S.SetStyle(wxSUNKEN_BORDER | wxLC_REPORT | wxLC_HRULES | wxLC_VRULES );
          mList = S.Id(CurvesListID).AddListControlReportMode();
          mList->InsertColumn(0, _("Curve Name"), wxLIST_FORMAT_RIGHT);
       }
       S.EndStatic();
       S.StartVerticalLay(0);
       {
          S.Id(UpButtonID).AddButton(_("Move &Up"), wxALIGN_LEFT);
          S.Id(DownButtonID).AddButton(_("Move &Down"), wxALIGN_LEFT);
          S.Id(RenameButtonID).AddButton(_("&Rename..."), wxALIGN_LEFT);
          S.Id(DeleteButtonID).AddButton(_("D&elete..."), wxALIGN_LEFT);
          S.Id(ImportButtonID).AddButton(_("I&mport..."), wxALIGN_LEFT);
          S.Id(ExportButtonID).AddButton(_("E&xport..."), wxALIGN_LEFT);
          S.Id(LibraryButtonID).AddButton(_("&Get More..."), wxALIGN_LEFT);
          S.Id(DefaultsButtonID).AddButton(_("De&faults"), wxALIGN_LEFT);
       }
       S.EndVerticalLay();
    }
    S.EndHorizontalLay();
    S.AddStandardButtons();
    S.StartStatic(_("Help"));
    S.AddConstTextBox( {}, _("Rename 'unnamed' to save a new entry.\n'OK' saves all changes, 'Cancel' doesn't."));
    S.EndStatic();
    PopulateList(mPosition);
    Fit();
 
    return;
 }