Changeset 126 in Sophya for trunk/SophyaPI/PI/pistdwdgx.cc

Timestamp:

Jul 22, 1998, 1:15:49 PM (27 years ago)

Author:

ercodmgr

Message:

Les presques dernieres modifs des drawers et Tools associes -
Pour copie sur PC-Linux , Reza 22/07/98

File:

• trunk/SophyaPI/PI/pistdwdgx.cc (modified) (11 diffs)

trunk/SophyaPI/PI/pistdwdgx.cc

@@ -332 +332 @@
 /* --Methode-- */
 PIScaleX::PIScaleX(PIContainerGen *par, char *nom, PIMessage msg,
-                   bool horiz, int sx, int sy, int px, int py)
-: PIScaleGen(par, nom, msg, horiz, sx, sy, px, py)
+                   int dir, int sx, int sy, int px, int py)
+: PIScaleGen(par, nom, msg, dir, sx, sy, px, py)
 {
 int n=0;
@@ -340 +340 @@
 XtSetArg(warg[n],XmNnavigationType,XmNONE);  n++;
 XtSetArg(warg[n],XmNtraversalOn,FALSE);  n++;
-if (horiz)
-  {
+if (dir == kSDirLtoR) {
   XtSetArg(warg[n], XmNorientation, XmHORIZONTAL); n++;
   XtSetArg(warg[n], XmNprocessingDirection, XmMAX_ON_RIGHT); n++;
   }
-else
-  { 
+else if (dir == kSDirRtoL) {
+  XtSetArg(warg[n], XmNorientation, XmHORIZONTAL); n++;
+  XtSetArg(warg[n], XmNprocessingDirection, XmMAX_ON_LEFT); n++;
+  }
+else if (dir == kSDirDownUp) {
   XtSetArg(warg[n], XmNorientation, XmVERTICAL); n++;
   XtSetArg(warg[n], XmNprocessingDirection, XmMAX_ON_TOP); n++;
   }
+else { // kSDirUpDown
+  XtSetArg(warg[n], XmNorientation, XmVERTICAL); n++;
+  XtSetArg(warg[n], XmNprocessingDirection, XmMAX_ON_BOTTOM); n++;
+  }
 XtSetArg(warg[n], XmNscaleWidth, sx); n++;
 XtSetArg(warg[n], XmNscaleHeight, sy); n++;
-XtSetArg(warg[n], XmNstringDirection, XmSTRING_DIRECTION_R_TO_L); n++;
+// XtSetArg(warg[n], XmNstringDirection, XmSTRING_DIRECTION_R_TO_L); n++;
 CreateXtWdg(nom, xmScaleWidgetClass, NULL, sx, sy, px, py, warg, n);
-// XtSetValues(XtWdg(), warg, n);
+
 SetMinMax(1, 100);
 SetValue(1);
+
 XtAddCallback(XtWdg(), XmNvalueChangedCallback, 
              (XtCallbackProc) scale_action, (XtPointer)this);
@@ -382 +389 @@
 }
 
+/* --Methode-- */
+void PIScaleX::GetMinMax(int& min, int& max)
+{
+min = mMin;   max = mMax;
+return;
+}
 
 /* --Methode-- */
@@ -435 +448 @@
 pis = (PIScrollBar *) usd ;
 pis->CBSetVal(calld->value);
-scroll_value = calld->value;
 pis->Send(pis->Msg(), PIMsg_DataChanged, (void *)(&scroll_value));
 return;
@@ -447 +459 @@
 pis = (PIScrollBar *) usd ;
 pis->CBSetVal(calld->value);
-scroll_value = calld->value;
 pis->Send(pis->Msg(), PIMsg_Drag, (void *)(&scroll_value));
 return;
@@ -454 +465 @@
 /* --Methode-- */
 PIScrollBarX::PIScrollBarX(PIContainerGen *par, char *nom, PIMessage msg,
-                           bool vert, int sx, int sy, int px, int py)
-: PIScrollBarGen(par, nom, msg, vert, sx, sy, px, py)
+                           int dir, int sx, int sy, int px, int py)
+: PIScrollBarGen(par, nom, msg, dir, sx, sy, px, py)
 {
 int n=0;
 Arg warg[6];
 
-CreateXtWdg(nom, xmScrollBarWidgetClass, NULL, sx, sy, px, py);
 XtSetArg(warg[n],XmNnavigationType,XmNONE);  n++;
 XtSetArg(warg[n],XmNtraversalOn,FALSE);  n++;
-if (vert)
-  {
+if (dir == kSDirLtoR) {
+  XtSetArg(warg[n], XmNorientation, XmHORIZONTAL); n++;
+  XtSetArg(warg[n], XmNprocessingDirection, XmMAX_ON_RIGHT); n++;
+  }
+else if (dir == kSDirRtoL) {
+  XtSetArg(warg[n], XmNorientation, XmHORIZONTAL); n++;
+  XtSetArg(warg[n], XmNprocessingDirection, XmMAX_ON_LEFT); n++;
+  }
+else if (dir == kSDirDownUp) {
+  XtSetArg(warg[n], XmNorientation, XmVERTICAL); n++;
+  XtSetArg(warg[n], XmNprocessingDirection, XmMAX_ON_TOP); n++;
+  }
+else { // kSDirUpDown
   XtSetArg(warg[n], XmNorientation, XmVERTICAL); n++;
   XtSetArg(warg[n], XmNprocessingDirection, XmMAX_ON_BOTTOM); n++;
   }
-else
-  { 
-  XtSetArg(warg[n], XmNorientation, XmHORIZONTAL); n++;
-  XtSetArg(warg[n], XmNprocessingDirection, XmMAX_ON_RIGHT); n++;
-  }
-XtSetValues(XtWdg(), warg, n);
+CreateXtWdg(nom, xmScrollBarWidgetClass, NULL, sx, sy, px, py, warg, n);
 mAcD = false;
 mVal = -1;
 mMin = mMax = 0;
-mSz = 0;
-SetMinMax(0, 100);
+mSz = 10;
+mDir = dir;
+SetMinMax(1, 100);
 SetSlSize(10);
-SetValue(0);
+SetValue(1);
 XtAddCallback(XtWdg(), XmNvalueChangedCallback, 
              (XtCallbackProc) scrollbar_action, (XtPointer)this);
@@ -512 +529 @@
 if (mVal < min)  mVal = min;
 if (mVal > max-mSz)  mVal = max-mSz;
+//DBG printf("PIScrollBarX::SetMinMax(%d %d )  %d  Sz=%d \n", min, max, mVal, mSz);
 int n=0;
 Arg warg[3];
@@ -519 +537 @@
 XtSetValues(XtWdg(), warg, n);
 mMin = min;   mMax = max;
-return;
-}
-
+//DBG printf("--OUT-OF-- PIScrollBarX::SetMinMax(%d %d )  %d  Sz=%d \n", min, max, mVal, mSz);
+return;
+}
+
+/* --Methode-- */
+void PIScrollBarX::GetMinMax(int& min, int& max)
+{
+min = mMin;   max = mMax;
+return;
+}
 
 /* --Methode-- */
@@ -530 +555 @@
 if (val > mMax-mSz)  val = mMax-mSz;
 Arg warg[2];
+//DBG printf("PIScrollBarX::SetValue(%d -> %d) \n", val, val0);
 XtSetArg(warg[n], XmNvalue, val); n++;
 XtSetValues(this->sdw, warg, n);
 mVal = val;
+//DBG printf("--OUT-OF---PIScrollBarX::SetValue(%d -> %d) \n", val, val0);
 return;
 }
@@ -562 +589 @@
 szl = sz/10;
 if (szl < 1)  szl = 1;
+//DBG printf("PIScrollBarX::SetSlSize(%d ) \n", sz);
 XtSetArg(warg[n], XmNsliderSize, sz); n++;
 XtSetArg(warg[n], XmNpageIncrement, sz); n++;
 XtSetArg(warg[n], XmNincrement, szl); n++;
-if (mVal > mMax-sz) { 
-  mVal = mMax-sz;
-  XtSetArg(warg[n], XmNvalue, mVal); n++;
-  }
+if (mVal < mMin)  mVal = mMin;
+if (mVal > mMax-sz)  mVal = mMax-sz;
+XtSetArg(warg[n], XmNvalue, mVal); n++;
 XtSetValues(this->sdw, warg, n);
+//DBG printf("---OUT-OF---PIScrollBarX::SetSlSize(%d ) -> mVal= %d (cv1,2=%d %d)\n", sz,mVal, cv1, cv2);
 mSz = sz;
 return;
@@ -591 +619 @@
 {
 mVal = val;
-return;
-}
-
+scroll_value = mVal;
+//DBG printf("PIScrollBarX::CBSetVal(%d) %d -> %d \n", mDir, val, mVal);
+return;
+}
+