Changeset 544 in Sophya for trunk/SophyaPI/PIext/pintuple.cc

Timestamp:

Nov 3, 1999, 7:18:23 PM (26 years ago)

Author:

ercodmgr

Message:

Documentation + ameliorations DrawStats + vector->tvector pour Planck - Reza 3/11/99

File:

• trunk/SophyaPI/PIext/pintuple.cc (modified) (3 diffs)

trunk/SophyaPI/PIext/pintuple.cc

@@ -34 +34 @@
 //++
 // PINTuple(NTupleInterface* nt, bool ad)
-//      Cosntructeur. Si "ad == true", l'objet "nt" est détruit par 
+//      Constructeur. Si "ad == true", l'objet "nt" est détruit par 
 //      le destructeur de l'objet "PINTuple"
-//      Note : nt doit être créé par new
+//      Note : "nt" doit être créé par new
 //--
  
@@ -45 +45 @@
   mNT = nt;
   mAdDO = ad; 
+  SetStats(true);
   SelectXY(NULL, NULL);
   SelectWt(NULL, 1);
@@ -194 +195 @@
 }
 
-/*
-sprintf(buff, "NTuple:  NEntry= %d  NDisp= %d", (int)mNT->NEntry(), nok);
-g->BaseGraphic()->DrawString(15,15,buff);
-*/
+if (stats) { // Trace de stats 
+  char label[64];
+  sprintf(label, "Nd= %d/ Ntot= %d", nok, mNT->NbLines());
+  g->SelFontSz((YMax() - YMin())/25, mFAtt);  
+  PIGrCoord a,d;
+  double cH = (double)g->GetFontHeight(a,d);
+  double cellHeight = cH * 1.4;
+  double cellWidth =  (double)g->CalcStringWidth(label) * 1.1;
+  g->DrawLine(XMax() - cellWidth, YMax(),
+                       XMax() - cellWidth, YMax() - cellHeight);
+  g->DrawLine(XMax() - cellWidth, YMax() - cellHeight,
+                       XMax()            , YMax() - cellHeight);
+  g->DrawString(XMax() - cellWidth*0.95, YMax() - cH*1.2, label);
+}
+
 return;
 }