Logo ROOT   6.30.04
Reference Guide
 All Namespaces Files Pages
TFunctionParametersDialog.cxx
Go to the documentation of this file.
1 // @(#)root/ged:$Id$
2 // Author: Ilka Antcheva 08/05/06
3 
4 /*************************************************************************
5  * Copyright (C) 1995-2006, Rene Brun and Fons Rademakers. *
6  * All rights reserved. *
7  * *
8  * For the licensing terms see $ROOTSYS/LICENSE. *
9  * For the list of contributors see $ROOTSYS/README/CREDITS. *
10  *************************************************************************/
11 
12 //////////////////////////////////////////////////////////////////////////
13 // //
14 // TFunctionParametersDialog //
15 // //
16 // This class is used for function parameter settings. //
17 // //
18 //////////////////////////////////////////////////////////////////////////
19 
20 #include "TFunctionParametersDialog.h"
21 #include "TTimer.h"
22 #include "TList.h"
23 #include "TF1.h"
24 #include "TGButton.h"
25 #include "TGFrame.h"
26 #include "TGLabel.h"
27 #include "TGLayout.h"
28 #include "TGTextEntry.h"
29 #include "TGMsgBox.h"
30 #include "TGNumberEntry.h"
31 #include "TGTripleSlider.h"
32 #include "TVirtualPad.h"
33 
34 
35 enum EParametersDialogWid {
36  kNAME,
37  kFIX = 10,
38  kVAL = 20,
39  kMIN = 30,
40  kMAX = 40,
41  kSLD = 50,
42  kUPDATE = 8888,
43  kRESET,
44  kAPPLY,
45  kOK,
46  kCANCEL
47 };
48 
49 ClassImp(TFunctionParametersDialog);
50 
51 ////////////////////////////////////////////////////////////////////////////////
52 /// Create the parameters' dialog of currently selected function 'func'.
53 
54 TFunctionParametersDialog::TFunctionParametersDialog(const TGWindow *p,
55  const TGWindow *main,
56  TF1 *func,
57  TVirtualPad *pad,
58  Double_t rx, Double_t ry) :
59  TGTransientFrame(p, main, 10, 10, kVerticalFrame)
60 {
61  fFunc = func;
62  fFpad = pad;
63  fRXmin = rx;
64  fRXmax = ry;
65  fFunc->GetRange(fRangexmin, fRangexmax);
66  fNP = fFunc->GetNpar();
67  fHasChanges = kFALSE;
68  fPmin = new Double_t[fNP];
69  fPmax = new Double_t[fNP];
70  fPval = new Double_t[fNP];
71  fPerr = new Double_t[fNP];
72 
73  for (Int_t i = 0; i < fNP; i++) {
74  fFunc->GetParLimits(i, fPmin[i], fPmax[i]);
75  fPval[i] = fFunc->GetParameter(i);
76  fPerr[i] = fFunc->GetParError(i);
77  }
78  fParNam = new TGTextEntry*[fNP];
79  fParFix = new TGCheckButton*[fNP];
80  fParVal = new TGNumberEntry*[fNP];
81  fParMin = new TGNumberEntryField*[fNP];
82  fParMax = new TGNumberEntryField*[fNP];
83  fParSld = new TGTripleHSlider*[fNP];
84 
85  memset(fParNam, 0, sizeof(TGTextEntry*)*fNP);
86  memset(fParFix, 0, sizeof(TGCheckButton*)*fNP);
87  memset(fParVal, 0, sizeof(TGNumberEntry*)*fNP);
88  memset(fParMin, 0, sizeof(TGNumberEntryField*)*fNP);
89  memset(fParMax, 0, sizeof(TGNumberEntryField*)*fNP);
90  memset(fParMax, 0, sizeof(TGTripleHSlider*)*fNP);
91 
92  TGCompositeFrame *f1 = new TGCompositeFrame(this, 80, 20, kHorizontalFrame);
93  AddFrame(f1, new TGLayoutHints(kLHintsTop, 1, 1, 1, 1));
94 
95  // column 'Name'
96  fContNam = new TGCompositeFrame(f1, 80, 20, kVerticalFrame | kFixedWidth);
97  fContNam->AddFrame(new TGLabel(fContNam,"Name"),
98  new TGLayoutHints(kLHintsTop, 5, 0, 0, 0));
99  for (Int_t i = 0; i < fNP; i++ ) {
100  fParNam[i] = new TGTextEntry(fContNam, new TGTextBuffer(80), kNAME+i);
101  fParNam[i]->SetText(Form("%s", fFunc->GetParName(i)));
102  fParNam[i]->SetEnabled(kFALSE);
103  fContNam->AddFrame(fParNam[i],
104  new TGLayoutHints(kLHintsExpandX, 5, 5, 7, 5));
105  }
106  f1->AddFrame(fContNam, new TGLayoutHints(kLHintsExpandX, 5, 5, 5, 5));
107 
108  // column 'Fix'
109  fContFix = new TGCompositeFrame(f1, 20, 20, kVerticalFrame | kFixedWidth);
110  fContFix->AddFrame(new TGLabel(fContFix,"Fix"),
111  new TGLayoutHints(kLHintsTop, 2, 0, 0, 0));
112  for (Int_t i = 0; i < fNP; i++ ) {
113  fParFix[i] = new TGCheckButton(fContFix, "", kFIX*fNP+i);
114  fParFix[i]->SetToolTipText(Form("Set %s to fixed", fFunc->GetParName(i)));
115  fContFix->AddFrame(fParFix[i], new TGLayoutHints(kLHintsLeft | kLHintsCenterY,
116  5, 5, 10, 7));
117  if ((fPmin[i] == fPmax[i]) && (fPmin[i] || fPmax[i]))
118  fParFix[i]->SetState(kButtonDown);
119  else
120  fParFix[i]->SetState(kButtonUp);
121  fParFix[i]->Connect("Toggled(Bool_t)", "TFunctionParametersDialog", this, "DoFix(Bool_t)");
122  }
123  f1->AddFrame(fContFix, new TGLayoutHints(kLHintsLeft, 5, 5, 5, 5));
124 
125  // column 'Value'
126  fContVal = new TGCompositeFrame(f1, 80, 20, kVerticalFrame | kFixedWidth);
127  fContVal->AddFrame(new TGLabel(fContVal,"Value"),
128  new TGLayoutHints(kLHintsTop, 5, 0, 0, 0));
129  for (Int_t i = 0; i < fNP; i++ ) {
130  fParVal[i] = new TGNumberEntry(fContVal, 1.2E-12, 15, kVAL*fNP+i,
131  TGNumberFormat::kNESReal);
132  fParVal[i]->SetNumber(fPval[i]);
133  fParVal[i]->SetFormat(TGNumberFormat::kNESReal, TGNumberFormat::kNEAAnyNumber); //tbs
134  fContVal->AddFrame(fParVal[i], new TGLayoutHints(kLHintsExpandX, 5, 5, 7, 5));
135  (fParVal[i]->GetNumberEntry())->SetToolTipText(Form("%s", fFunc->GetParName(i)));
136  (fParVal[i]->GetNumberEntry())->Connect("ReturnPressed()", "TFunctionParametersDialog",
137  this, "DoParValue()");
138  fParVal[i]->Connect("ValueSet(Long_t)", "TFunctionParametersDialog", this, "DoParValue()");
139  }
140  f1->AddFrame(fContVal, new TGLayoutHints(kLHintsExpandX, 5, 5, 5, 5));
141 
142  // column 'Min'
143  fContMin = new TGCompositeFrame(f1, 80, 20, kVerticalFrame | kFixedWidth);
144  fContMin->AddFrame(new TGLabel(fContMin,"Min"),
145  new TGLayoutHints(kLHintsTop, 5, 0, 0, 0));
146  for (Int_t i = 0; i < fNP; i++ ) {
147  fParMin[i] = new TGNumberEntryField(fContMin, kMIN*fNP+i, 0.0,
148  TGNumberFormat::kNESReal,
149  TGNumberFormat::kNEAAnyNumber);
150  ((TGTextEntry*)fParMin[i])->SetToolTipText(Form("Lower limit of %s",
151  fFunc->GetParName(i)));
152  fContMin->AddFrame(fParMin[i], new TGLayoutHints(kLHintsExpandX, 5, 5, 7, 5));
153  if (fPmin[i])
154  fParMin[i]->SetNumber(fPmin[i]);
155  else if (fPerr[i])
156  fParMin[i]->SetNumber(fPval[i]-3*fPerr[i]);
157  else if (fPval[i])
158  fParMin[i]->SetNumber(fPval[i]-0.1*fPval[i]);
159  else
160  fParMin[i]->SetNumber(1.0);
161  fParMin[i]->Connect("ReturnPressed()", "TFunctionParametersDialog", this, "DoParMinLimit()");
162  }
163  f1->AddFrame(fContMin, new TGLayoutHints(kLHintsExpandX, 5, 5, 5, 5));
164 
165  // column 'Set Range'
166  fContSld = new TGCompositeFrame(f1, 120, 20, kVerticalFrame | kFixedWidth);
167  fContSld->AddFrame(new TGLabel(fContSld,"Set Range"),
168  new TGLayoutHints(kLHintsTop, 5, 0, 0, 0));
169  for (Int_t i = 0; i < fNP; i++ ) {
170  fParSld[i] = new TGTripleHSlider(fContSld, 100, kDoubleScaleBoth, kSLD*fNP+i,
171  kHorizontalFrame, GetDefaultFrameBackground(),
172  kFALSE, kFALSE, kFALSE, kFALSE);
173  fContSld->AddFrame(fParSld[i], new TGLayoutHints(kLHintsExpandX, 5, 5, 5, 5));
174  fParSld[i]->SetConstrained(kTRUE);
175  }
176  f1->AddFrame(fContSld, new TGLayoutHints(kLHintsExpandX, 5, 5, 5, 5));
177 
178  // column 'Max'
179  fContMax = new TGCompositeFrame(f1, 80, 20, kVerticalFrame);
180  fContMax->AddFrame(new TGLabel(fContMax,"Max"),
181  new TGLayoutHints(kLHintsTop, 5, 0, 0, 0));
182  for (Int_t i = 0; i < fNP; i++ ) {
183  fParMax[i] = new TGNumberEntryField(fContMax, kMAX*fNP+i, 0.0,
184  TGNumberFormat::kNESReal,
185  TGNumberFormat::kNEAAnyNumber);
186  ((TGTextEntry*)fParMax[i])->SetToolTipText(Form("Upper limit of %s",
187  fFunc->GetParName(i)));
188  fContMax->AddFrame(fParMax[i], new TGLayoutHints(kLHintsExpandX, 5, 5, 7, 5));
189  if (fPmax[i])
190  fParMax[i]->SetNumber(fPmax[i]);
191  else if (fPerr[i])
192  fParMax[i]->SetNumber(fPval[i]+3*fPerr[i]);
193  else if (fPval[i])
194  fParMax[i]->SetNumber(fPval[i]+0.1*fPval[i]);
195  else
196  fParMax[i]->SetNumber(1.0);
197  if (fParMax[i]->GetNumber() < fParMin[i]->GetNumber()){
198  Double_t temp;
199  temp = fParMax[i]->GetNumber();
200  fParMax[i]->SetNumber(fParMin[i]->GetNumber());
201  fParMin[i]->SetNumber(temp);
202  }
203  fParMax[i]->Connect("ReturnPressed()", "TFunctionParametersDialog", this, "DoParMaxLimit()");
204  }
205  f1->AddFrame(fContMax, new TGLayoutHints(kLHintsExpandX, 5, 5, 5, 5));
206 
207 
208  fUpdate = new TGCheckButton(this, "&Immediate preview", kUPDATE);
209  fUpdate->SetToolTipText("Immediate function redrawing");
210  AddFrame(fUpdate, new TGLayoutHints(kLHintsLeft | kLHintsCenterY, 5, 5, 5, 5));
211  fUpdate->Connect("Toggled(Bool_t)", "TFunctionParametersDialog", this, "HandleButtons(Bool_t)");
212 
213  TGCompositeFrame *f2 = new TGCompositeFrame(this, 270, 20, kHorizontalFrame | kFixedWidth);
214  AddFrame(f2, new TGLayoutHints(kLHintsRight, 20, 20, 5, 1));
215 
216  fReset = new TGTextButton(f2, "&Reset", kRESET);
217  f2->AddFrame(fReset, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsExpandX,5,5,5,5));
218  fReset->SetToolTipText("Reset the parameter settings");
219  fReset->SetState(kButtonDisabled);
220  fReset->Connect("Clicked()", "TFunctionParametersDialog", this, "DoReset()");
221 
222  fApply = new TGTextButton(f2, "&Apply", kAPPLY);
223  f2->AddFrame(fApply, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsExpandX,5,5,5,5));
224  fApply->SetState(kButtonDisabled);
225  fApply->Connect("Clicked()", "TFunctionParametersDialog", this, "DoApply()");
226  fApply->SetToolTipText("Apply parameter settings and redraw the function");
227 
228  fOK = new TGTextButton(f2, "&OK", kOK);
229  f2->AddFrame(fOK, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsExpandX,5,5,5,5));
230  fOK->SetToolTipText("Apply parameter settings, redraw function and close this dialog");
231  fOK->Connect("Clicked()", "TFunctionParametersDialog", this, "DoOK()");
232 
233  fCancel = new TGTextButton(f2, "&Cancel", kCANCEL);
234  f2->AddFrame(fCancel, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsExpandX,5,5,5,5));
235  fCancel->SetToolTipText("Close this dialog with no parameter changes");
236  fCancel->Connect("Clicked()", "TFunctionParametersDialog", this, "DoCancel()");
237 
238  MapSubwindows();
239  Resize(GetDefaultSize());
240  CenterOnParent(kFALSE, kBottomLeft);
241  SetWindowName(Form("Set Parameters of %s", fFunc->GetTitle()));
242  MapWindow();
243 
244  for (Int_t i = 0; i < fNP; i++ ) {
245  if (fParFix[i]->GetState() == kButtonDown) {
246  fParVal[i]->SetState(kFALSE);
247  fParMin[i]->SetEnabled(kFALSE);
248  fParMax[i]->SetEnabled(kFALSE);
249  fParSld[i]->UnmapWindow();
250  } else {
251  fParSld[i]->SetRange(fParMin[i]->GetNumber(), fParMax[i]->GetNumber());
252  fParSld[i]->SetPosition(fParMin[i]->GetNumber(), fParMax[i]->GetNumber());
253  fParSld[i]->SetPointerPosition(fPval[i]);
254  fParSld[i]->Connect("PointerPositionChanged()", "TFunctionParametersDialog",
255  this, "DoSlider()");
256  fParSld[i]->Connect("PositionChanged()", "TFunctionParametersDialog",
257  this, "DoSlider()");
258  }
259  }
260 
261  gClient->WaitFor(this);
262 }
263 
264 ////////////////////////////////////////////////////////////////////////////////
265 /// Destructor.
266 
267 TFunctionParametersDialog::~TFunctionParametersDialog()
268 {
269  TGFrameElement *el;
270  TIter next(GetList());
271 
272  while ((el = (TGFrameElement *)next())) {
273  if (!strcmp(el->fFrame->ClassName(), "TGCompositeFrame")) {
274  TGFrameElement *el1;
275  TIter next1(((TGCompositeFrame *)el->fFrame)->GetList());
276  while ((el1 = (TGFrameElement *)next1())) {
277  if (!strcmp(el1->fFrame->ClassName(), "TGCompositeFrame"))
278  ((TGCompositeFrame *)el1->fFrame)->Cleanup();
279  }
280  ((TGCompositeFrame *)el->fFrame)->Cleanup();
281  }
282  }
283  Cleanup();
284  delete [] fPval;
285  delete [] fPmin;
286  delete [] fPmax;
287  delete [] fPerr;
288 }
289 
290 ////////////////////////////////////////////////////////////////////////////////
291 /// Close parameters' dialog.
292 
293 void TFunctionParametersDialog::CloseWindow()
294 {
295  if (fHasChanges) {
296  Int_t ret;
297  const char *txt;
298  txt = "Do you want to apply last parameters' setting?";
299  new TGMsgBox(fClient->GetRoot(), GetMainFrame(),
300  "Parameters Have Been Changed", txt, kMBIconExclamation,
301  kMBYes | kMBNo | kMBCancel, &ret);
302  if (ret == kMBYes) {
303  DoOK();
304  return;
305  } else if (ret == kMBNo) {
306  DoReset();
307  } else return;
308  }
309  DeleteWindow();
310 }
311 
312 ////////////////////////////////////////////////////////////////////////////////
313 /// Slot related to the Cancel button.
314 
315 void TFunctionParametersDialog::DoCancel()
316 {
317  if (fHasChanges)
318  DoReset();
319  TTimer::SingleShot(50, "TFunctionParametersDialog", this, "CloseWindow()");
320 }
321 
322 ////////////////////////////////////////////////////////////////////////////////
323 /// Slot related to the Fix check button.
324 
325 void TFunctionParametersDialog::DoFix(Bool_t on)
326 {
327  fReset->SetState(kButtonUp);
328  TGButton *bt = (TGButton *) gTQSender;
329  Int_t id = bt->WidgetId();
330  fHasChanges = kTRUE;
331  for (Int_t i = 0; i < fNP; i++ ) {
332  if (id == kFIX*fNP+i) {
333  if (on) {
334  if (fParVal[i]->GetNumber() != 0) {
335  fParMin[i]->SetNumber(fParVal[i]->GetNumber());
336  fParMin[i]->SetEnabled(kFALSE);
337  fParMax[i]->SetNumber(fParVal[i]->GetNumber());
338  fParMax[i]->SetEnabled(kFALSE);
339  } else {
340  fParMin[i]->SetNumber(1.);
341  fParMin[i]->SetEnabled(kFALSE);
342  fParMax[i]->SetNumber(1.);
343  fParMax[i]->SetEnabled(kFALSE);
344  }
345  fParVal[i]->SetState(kFALSE);
346  fParSld[i]->Disconnect("PointerPositionChanged()");
347  fParSld[i]->Disconnect("PositionChanged()");
348  fParSld[i]->UnmapWindow();
349  fFunc->FixParameter(i, fParVal[i]->GetNumber());
350  } else if (!fParMin[i]->IsEnabled()) {
351  if (fPmin[i] != fPmax[i]) {
352  if (fPmin[i])
353  fParMin[i]->SetNumber(fPmin[i]);
354  else if (fPerr[i])
355  fParMin[i]->SetNumber(fPval[i]-3*fPerr[i]);
356  else if (fPval[i])
357  fParMin[i]->SetNumber(fPval[i]-0.1*fPval[i]);
358  else
359  fParMin[i]->SetNumber(1.0);
360  if (fPmax[i])
361  fParMax[i]->SetNumber(fPmax[i]);
362  else if (fPerr[i])
363  fParMax[i]->SetNumber(fPval[i]+3*fPerr[i]);
364  else if (fPval[i])
365  fParMax[i]->SetNumber(fPval[i]+0.1*fPval[i]);
366  else
367  fParMax[i]->SetNumber(1.0);
368  } else if (fPval[i]) {
369  fParMin[i]->SetNumber(fPval[i]-0.1*fPval[i]);
370  fParMax[i]->SetNumber(fPval[i]+0.1*fPval[i]);
371  } else {
372  fParMin[i]->SetNumber(1.0);
373  fParMax[i]->SetNumber(1.0);
374  }
375  if (fParMax[i]->GetNumber() < fParMin[i]->GetNumber()){
376  Double_t temp;
377  temp = fParMax[i]->GetNumber();
378  fParMax[i]->SetNumber(fParMin[i]->GetNumber());
379  fParMin[i]->SetNumber(temp);
380  }
381  fParMax[i]->SetEnabled(kTRUE);
382  fParMin[i]->SetEnabled(kTRUE);
383  fParSld[i]->MapWindow();
384  fParVal[i]->SetState(kTRUE);
385  fParSld[i]->SetRange(fParMin[i]->GetNumber(), fParMax[i]->GetNumber());
386  fParSld[i]->SetPosition(fParMin[i]->GetNumber(), fParMax[i]->GetNumber());
387  fParSld[i]->SetPointerPosition(fPval[i]);
388  fParSld[i]->Connect("PointerPositionChanged()", "TFunctionParametersDialog",
389  this, "DoSlider()");
390  fParSld[i]->Connect("PositionChanged()", "TFunctionParametersDialog",
391  this, "DoSlider()");
392  fFunc->SetParLimits(i, fParMin[i]->GetNumber(), fParMax[i]->GetNumber());
393  }
394  }
395  }
396  if (fUpdate->GetState() == kButtonDown)
397  RedrawFunction();
398  else if ((fApply->GetState() == kButtonDisabled) && fHasChanges)
399  fApply->SetState(kButtonUp);
400 }
401 
402 ////////////////////////////////////////////////////////////////////////////////
403 /// Slot related to the OK button.
404 
405 void TFunctionParametersDialog::DoOK()
406 {
407  if (fHasChanges)
408  RedrawFunction();
409  fFunc->SetRange(fRangexmin, fRangexmax);
410  TTimer::SingleShot(50, "TFunctionParametersDialog", this, "CloseWindow()");
411 }
412 
413 ////////////////////////////////////////////////////////////////////////////////
414 /// Slot related to the Preview button.
415 
416 void TFunctionParametersDialog::DoApply()
417 {
418  RedrawFunction();
419  fApply->SetState(kButtonDisabled);
420  if (fReset->GetState() == kButtonDisabled)
421  fReset->SetState(kButtonUp);
422 }
423 
424 ////////////////////////////////////////////////////////////////////////////////
425 /// Slot related to the Reset button.
426 
427 void TFunctionParametersDialog::DoReset()
428 {
429  fHasChanges = kTRUE;
430  Int_t k = fNP;
431  for (Int_t i = 0; i < fNP; i++) {
432  if (fParVal[i]->GetNumber() == fPval[i])
433  k--;
434  else
435  break;
436  }
437 
438  if (!k) {
439  if (fReset->GetState() == kButtonUp)
440  fReset->SetState(kButtonDisabled);
441  fHasChanges = kFALSE;
442  return;
443  }
444  for (Int_t i = 0; i < fNP; i++) {
445  fFunc->SetParameter(i, fPval[i]);
446  fFunc->SetParLimits(i, fPmin[i], fPmax[i]);
447  fFunc->SetParError(i, fPerr[i]);
448 
449  if (fPmin[i])
450  fParMin[i]->SetNumber(fPmin[i]);
451  else if (fPerr[i])
452  fParMin[i]->SetNumber(fPval[i]-3*fPerr[i]);
453  else if (fPval[i])
454  fParMin[i]->SetNumber(fPval[i]-0.1*fPval[i]);
455  else
456  fParMin[i]->SetNumber(1.0);
457 
458  if (fPmax[i])
459  fParMax[i]->SetNumber(fPmax[i]);
460  else if (fPerr[i])
461  fParMax[i]->SetNumber(fPval[i]+3*fPerr[i]);
462  else if (fPval[i])
463  fParMax[i]->SetNumber(fPval[i]+0.1*fPval[i]);
464  else
465  fParMax[i]->SetNumber(1.0);
466  if (fParMax[i]->GetNumber() < fParMin[i]->GetNumber()){
467  Double_t temp;
468  temp = fParMax[i]->GetNumber();
469  fParMax[i]->SetNumber(fParMin[i]->GetNumber());
470  fParMin[i]->SetNumber(temp);
471  }
472  if (fParMin[i]->GetNumber() == fParMax[i]->GetNumber()) {
473  fParVal[i]->SetState(kFALSE);
474  fParMin[i]->SetEnabled(kFALSE);
475  fParMax[i]->SetEnabled(kFALSE);
476  fParSld[i]->Disconnect("PointerPositionChanged()");
477  fParSld[i]->Disconnect("PositionChanged()");
478  fParSld[i]->UnmapWindow();
479  fFunc->FixParameter(i, fParVal[i]->GetNumber());
480  fParFix[i]->SetState(kButtonDown);
481  } else {
482  fParFix[i]->SetState(kButtonUp);
483  if (!fParMax[i]->IsEnabled()) {
484  fParMax[i]->SetEnabled(kTRUE);
485  fParMin[i]->SetEnabled(kTRUE);
486  fParVal[i]->SetState(kTRUE);
487  fParSld[i]->SetRange(fParMin[i]->GetNumber(), fParMax[i]->GetNumber());
488  fParSld[i]->SetPosition(fParMin[i]->GetNumber(), fParMax[i]->GetNumber());
489  fParSld[i]->SetPointerPosition(fPval[i]);
490  fParSld[i]->MapWindow();
491  fParSld[i]->Connect("PointerPositionChanged()", "TFunctionParametersDialog",
492  this, "DoSlider()");
493  fParSld[i]->Connect("PositionChanged()", "TFunctionParametersDialog",
494  this, "DoSlider()");
495  }
496  }
497  fParVal[i]->SetNumber(fPval[i]);
498 
499  fParSld[i]->SetRange(fParMin[i]->GetNumber(), fParMax[i]->GetNumber());
500  fParSld[i]->SetPosition(fParMin[i]->GetNumber(), fParMax[i]->GetNumber());
501  fParSld[i]->SetPointerPosition(fPval[i]);
502  }
503 
504  if (fUpdate->GetState() == kButtonDown)
505  RedrawFunction();
506  else if ((fApply->GetState() == kButtonDisabled) && fHasChanges)
507  fApply->SetState(kButtonUp);
508  fHasChanges = kFALSE;
509  fReset->SetState(kButtonDisabled);
510 }
511 
512 ////////////////////////////////////////////////////////////////////////////////
513 /// Slot related to the parameters' value settings.
514 
515 void TFunctionParametersDialog::DoSlider()
516 {
517  TGTripleHSlider *sl = (TGTripleHSlider *) gTQSender;
518  Int_t id = sl->WidgetId();
519 
520  fHasChanges = kTRUE;
521  for (Int_t i = 0; i < fNP; i++ ) {
522  if (id == kSLD*fNP+i) {
523  fFunc->SetParameter(i,fParSld[i]->GetPointerPosition());
524  fFunc->SetParLimits(i,fParSld[i]->GetMinPosition(),
525  fParSld[i]->GetMaxPosition());
526  fParMin[i]->SetNumber(fParSld[i]->GetMinPosition());
527  fParMax[i]->SetNumber(fParSld[i]->GetMaxPosition());
528  fParVal[i]->SetNumber(fParSld[i]->GetPointerPosition());
529  }
530  }
531  if (fUpdate->GetState() == kButtonDown)
532  RedrawFunction();
533  else if ((fApply->GetState() == kButtonDisabled) && fHasChanges)
534  fApply->SetState(kButtonUp);
535  if (fReset->GetState() == kButtonDisabled)
536  fReset->SetState(kButtonUp);
537 }
538 
539 ////////////////////////////////////////////////////////////////////////////////
540 /// Slot related to the parameter value settings.
541 
542 void TFunctionParametersDialog::DoParValue()
543 {
544  TGNumberEntry *ne = (TGNumberEntry *) gTQSender;
545  Int_t id = ne->WidgetId();
546 
547  for (Int_t i = 0; i < fNP; i++ ) {
548  if (id == kVAL*fNP+i) {
549  fParSld[i]->SetPointerPosition(fParVal[i]->GetNumber());
550  if (fParVal[i]->GetNumber() < fParMin[i]->GetNumber()) {
551  fParMin[i]->SetNumber(fParVal[i]->GetNumber());
552  fClient->NeedRedraw(fParMin[i]);
553  fParSld[i]->SetRange(fParMin[i]->GetNumber(),
554  fParMax[i]->GetNumber());
555  fParSld[i]->SetPosition(fParMin[i]->GetNumber(),
556  fParMax[i]->GetNumber());
557  }
558  if (fParVal[i]->GetNumber() > fParMax[i]->GetNumber()) {
559  fParMax[i]->SetNumber(fParVal[i]->GetNumber());
560  fClient->NeedRedraw(fParMax[i]);
561  fParSld[i]->SetRange(fParMin[i]->GetNumber(),
562  fParMax[i]->GetNumber());
563  fParSld[i]->SetPosition(fParMin[i]->GetNumber(),
564  fParMax[i]->GetNumber());
565  }
566  fClient->NeedRedraw(fParSld[i]);
567  fFunc->SetParameter(i,fParSld[i]->GetPointerPosition());
568  fFunc->SetParLimits(i,fParSld[i]->GetMinPosition(),
569  fParSld[i]->GetMaxPosition());
570  }
571  }
572  fHasChanges = kTRUE;
573  if (fUpdate->GetState() == kButtonDown)
574  RedrawFunction();
575  else if ((fApply->GetState() == kButtonDisabled) && fHasChanges)
576  fApply->SetState(kButtonUp);
577  if (fReset->GetState() == kButtonDisabled)
578  fReset->SetState(kButtonUp);
579 }
580 
581 ////////////////////////////////////////////////////////////////////////////////
582 /// Slot related to the minumum parameter limit settings.
583 
584 void TFunctionParametersDialog::DoParMinLimit()
585 {
586  TGNumberEntryField *ne = (TGNumberEntryField *) gTQSender;
587  Int_t id = ne->WidgetId();
588 
589  for (Int_t i = 0; i < fNP; i++ ) {
590  if (id == kMIN*fNP+i) {
591  if (fParMin[i]->GetNumber() > fParMax[i]->GetNumber()) {
592  Int_t ret;
593  const char *txt;
594  txt = "The lower parameter bound cannot be bigger then the upper one.";
595  new TGMsgBox(fClient->GetRoot(), GetMainFrame(),
596  "Parameter Limits", txt, kMBIconExclamation,kMBOk,&ret);
597  fParMin[i]->SetNumber(fParVal[i]->GetNumber());
598  return;
599  }
600  fParSld[i]->SetRange(fParMin[i]->GetNumber(),
601  fParMax[i]->GetNumber());
602  fParSld[i]->SetPosition(fParMin[i]->GetNumber(),
603  fParMax[i]->GetNumber());
604  fParSld[i]->SetPointerPosition(fParVal[i]->GetNumber());
605  fClient->NeedRedraw(fParSld[i]);
606  }
607  }
608  fHasChanges = kTRUE;
609  if (fUpdate->GetState() == kButtonDown)
610  RedrawFunction();
611  else if ((fApply->GetState() == kButtonDisabled) && fHasChanges)
612  fApply->SetState(kButtonUp);
613  if (fReset->GetState() == kButtonDisabled)
614  fReset->SetState(kButtonUp);
615 }
616 
617 ////////////////////////////////////////////////////////////////////////////////
618 /// Slot related to the maximum parameter limit settings.
619 
620 void TFunctionParametersDialog::DoParMaxLimit()
621 {
622  TGNumberEntryField *ne = (TGNumberEntryField *) gTQSender;
623  Int_t id = ne->WidgetId();
624 
625  for (Int_t i = 0; i < fNP; i++ ) {
626  if (id == kMAX*fNP+i) {
627  if (fParMin[i]->GetNumber() > fParMax[i]->GetNumber()) {
628  Int_t ret;
629  const char *txt;
630  txt = "The lower parameter bound cannot be bigger then the upper one.";
631  new TGMsgBox(fClient->GetRoot(), GetMainFrame(),
632  "Parameter Limits", txt, kMBIconExclamation,kMBOk,&ret);
633  fParMax[i]->SetNumber(fParVal[i]->GetNumber());
634  return;
635  }
636  fParSld[i]->SetRange(fParMin[i]->GetNumber(),
637  fParMax[i]->GetNumber());
638  fParSld[i]->SetPosition(fParMin[i]->GetNumber(),
639  fParMax[i]->GetNumber());
640  fParSld[i]->SetPointerPosition(fParVal[i]->GetNumber());
641  fClient->NeedRedraw(fParSld[i]);
642  }
643  }
644  fHasChanges = kTRUE;
645  if (fUpdate->GetState() == kButtonDown)
646  RedrawFunction();
647  else if ((fApply->GetState() == kButtonDisabled) && fHasChanges)
648  fApply->SetState(kButtonUp);
649  if (fReset->GetState() == kButtonDisabled)
650  fReset->SetState(kButtonUp);
651 }
652 
653 ////////////////////////////////////////////////////////////////////////////////
654 /// Redraw function graphics.
655 
656 void TFunctionParametersDialog::RedrawFunction()
657 {
658  TString opt = fFunc->GetDrawOption();
659  opt.ToUpper();
660  if (!opt.Contains("SAME"))
661  opt += "SAME";
662  fFunc->SetRange(fRXmin, fRXmax);
663  fFunc->Draw(opt);
664  fFpad->Modified();
665  fFpad->Update();
666  fHasChanges = kFALSE;
667 }
668 
669 ////////////////////////////////////////////////////////////////////////////////
670 /// Handle the button dependent states in this dialog.
671 
672 void TFunctionParametersDialog::HandleButtons(Bool_t update)
673 {
674  if (update && fHasChanges)
675  RedrawFunction();
676  else if ((fApply->GetState() == kButtonDisabled) && fHasChanges) {
677  fApply->SetState(kButtonUp);
678  }
679 }