void ModelerUI::addControl(const char* szName, float fMin, float fMax, float fStepSize, float fInitVal)
{
Fl_Group* pgrpCurrBak = Fl_Group::current();
Fl_Group::current(m_ppckPack);
const int k_iTextHeight = 20;
const int k_iSliderHeight = 20;
// Setup the label box
Fl_Box* box = new Fl_Box(0, 0, m_ppckPack->w(), k_iTextHeight, szName);
box->labelsize(10);
box->hide();
box->box(FL_FLAT_BOX); // otherwise, Fl_Scroll messes up (ehsu)
// Setup the slider
Fl_Value_Slider *slider = new Fl_Value_Slider(0, 0, m_ppckPack->w(), k_iSliderHeight, 0);
slider->type(1);
slider->hide();
slider->user_data(this);
slider->callback(cb_sliders);
slider->range(fMin, fMax);
slider->step(fStepSize);
slider->value(fInitVal);
Fl_Group::current(pgrpCurrBak);
// Add this entry to the browser
string strName = "@C0"; // FLTK color encoding, we'll use @C0~@C6
strName += szName;
m_pbrsBrowser->add(strName.c_str());
// Setup the curve
m_pwndGraphWidget->addCurve(fInitVal, fMin, fMax);
++m_iCurrControlCount;
}
void ModelerApplication::Init(ModelerViewCreator_f createView,
const ModelerControl controls[], unsigned numControls)
{
m_animating = false;
m_numControls = numControls;
// ********************************************************
// Create the FLTK user interface
// ********************************************************
m_ui = new ModelerUserInterface();
// Store pointers to the controls for manipulation
m_controlLabelBoxes = new Fl_Box*[numControls];
m_controlValueSliders = new Fl_Value_Slider*[numControls];
// Constants for user interface setup
const int textHeight = 20;
const int sliderHeight = 20;
const int packWidth = m_ui->m_controlsPack->w();
m_ui->m_controlsPack->begin();
// For each control, add appropriate objects to the user interface
for (intptr_t i=0; i<m_numControls; i++)
{
// Add the entry to the selection box
m_ui->m_controlsBrowser->add(controls[i].m_name);
// Add the label (but make it invisible for now)
Fl_Box *box = new Fl_Box(0, 0, packWidth, textHeight, controls[i].m_name);
box->labelsize(10);
box->hide();
box->box(FL_FLAT_BOX); // otherwise, Fl_Scroll messes up (ehsu)
m_controlLabelBoxes[i] = box;
// Add the slider (but make it invisible for now)
Fl_Value_Slider *slider = new Fl_Value_Slider(0, 0, packWidth, sliderHeight,0);
slider->type(1);
slider->range(controls[i].m_minimum, controls[i].m_maximum);
slider->step(controls[i].m_stepsize);
slider->value(controls[i].m_value);
slider->hide();
m_controlValueSliders[i] = slider;
slider->user_data((void*)i);
slider->callback((Fl_Callback*)ModelerApplication::SliderCallback);
}
m_ui->m_controlsPack->end();
m_control_listeners.resize(m_numControls);
// Make sure that we remove the view from the
// Fl_Group, otherwise, it'll blow up
// THIS BUG FIXED 04-18-01 ehsu
m_ui->m_modelerWindow->remove(*(m_ui->m_modelerView));
delete m_ui->m_modelerView;
m_ui->m_modelerWindow->begin();
m_ui->m_modelerView = createView(0, 0, m_ui->m_modelerWindow->w(), m_ui->m_modelerWindow->h() ,NULL);
Fl_Group::current()->resizable(m_ui->m_modelerView);
m_ui->m_modelerWindow->end();
}