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

Timestamp:

Aug 2, 1999, 6:52:49 PM (26 years ago)

Author:

ercodmgr

Message:

1/ Extension de fonctionalites de gestion de repertoires (Lock, ...)
2/ Plus de NTupIntf_Adapter quand les objets heritent de NTupleInterface
3/ Support pour affichage info texte, ds PINtuple et PIStarList

File:

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

trunk/SophyaPI/PIext/pintuple.cc

@@ -97 +97 @@
 msz = mMSz;
 if (msz < 1) msz = 1;
-g->SelMarker(sz, mrk);
+g->SelMarker(msz, mrk);
 
 nok = 0;  
@@ -136 +136 @@
 }
 
+/* --Methode-- */
+void PINTuple::AppendTextInfo(string& info, double xmin, double ymin, double xmax, double ymax)
+{
+if (!mNT) return;
+if ( (xK < 0) || (yK < 0) )  return;
+
+int ncnt = 0;
+double xp,yp;
+char buff[128];
+sprintf(buff,"PINTuple: NLines= %d  NCol= %d \n", mNT->NbLines(),  mNT->NbColumns());
+info += buff;
+info += mNT->LineHeaderToString();
+for (int i=0; i<mNT->NbLines(); i++) {
+  xp = mNT->GetCell(i, xK);
+  yp = mNT->GetCell(i, yK);
+  if ( (xp < xmin) || (xp > xmax) || (yp < ymin) || (yp > ymax) )  continue;
+  ncnt++;
+  if (ncnt > 101) continue;
+  info += mNT->LineToString(i);
+  }
+if (ncnt >= 101) info += " .... \n";
+sprintf(buff," %d points inside selected region \n", ncnt);
+info += buff;
+// printf("PINTuple::AppendTextInfo()-DBG %g %g %g %g - %d\n", xmin, ymin, xmax, ymax, ncnt); 
+return;
+}