home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / Libraries / DCLAP 6d / dclap6d / DClap / DPanel.cpp < prev    next >
Encoding:
Text File  |  1996-07-05  |  16.8 KB  |  716 lines  |  [TEXT/R*ch]
  1. // DPanel.cp
  2. // d.g.gilbert
  3.  
  4.  
  5. #include "Dvibrant.h"
  6. #include "DWindow.h"
  7. #include "DPanel.h"
  8. #include "DControl.h"
  9. #include "DIconLib.h"
  10. #include "DCommand.h"
  11. #include "DTracker.h"
  12.  
  13.  
  14. extern "C" void panelDrawProc(Nlm_PaneL    item)
  15. {
  16.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  17.     if (obj)  obj->Draw();
  18. }
  19.  
  20. extern "C" void panelVscrollProc(Nlm_BaR sb, Nlm_SlatE s, short newval, short oldval)
  21. {
  22.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)s);
  23.     if (obj) obj->Scroll(true, obj, newval, oldval);
  24. }
  25.  
  26. extern "C" void panelHscrollProc(Nlm_BaR sb, Nlm_SlatE s, short newval, short oldval)
  27. {
  28.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)s);
  29.     if (obj) obj->Scroll(false, obj, newval, oldval);
  30. }
  31.  
  32. extern "C" void panelClickProc(Nlm_PaneL item, Nlm_PoinT mouse)
  33. {
  34.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  35.     if (obj) obj->Click(mouse);
  36. }
  37.  
  38. extern "C" void panelDragProc(Nlm_PaneL item, Nlm_PoinT mouse)
  39. {
  40.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  41.     if (obj) obj->Drag(mouse);
  42. }
  43.  
  44. extern "C" void panelHoldProc(Nlm_PaneL item, Nlm_PoinT mouse)
  45. {
  46.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  47.     if (obj) obj->Hold(mouse);
  48. }
  49.  
  50. extern "C" void panelReleaseProc(Nlm_PaneL item, Nlm_PoinT mouse)
  51. {
  52.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  53.     if (obj) obj->Release(mouse);
  54. }
  55.  
  56. extern "C" void panelCharProc(Nlm_SlatE s, Nlm_Char c)
  57. {
  58.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)s);
  59.     if (obj) obj->CharHandler(c);
  60. }
  61.  
  62.  
  63. //class DPanel : public DView
  64.  
  65. DPanel::DPanel(long id, DView* itsSuperior, short pixwidth, short pixheight, PanelKind kind) :
  66.         DView( id, NULL, kPanel, itsSuperior),
  67.         fMouseStillDown(false), fTracker(NULL),
  68.         fPanelKind(kind) 
  69. {
  70.     switch (kind) {
  71.     
  72.         case simple:
  73.             fPanel= Nlm_SimplePanel((Nlm_WindoW)itsSuperior->GetNlmObject(), 
  74.               pixwidth, pixheight, panelDrawProc);
  75.             break;
  76.             
  77.         case autonomous:
  78.             fPanel= Nlm_AutonomousPanel((Nlm_WindoW)itsSuperior->GetNlmObject(),
  79.               pixwidth, pixheight, 
  80.                 panelDrawProc, panelVscrollProc, panelHscrollProc, 0/*extra*/, NULL/*panelResetProc*/, 
  81.                 NULL/*panelGraphProcPtr*/);
  82.             Nlm_SetSlateChar( (Nlm_SlatE) fPanel, panelCharProc);
  83.             // ?? make autonomous panel a new class ??
  84.             break;
  85.             
  86.         case slatebound:
  87.             fPanel= Nlm_CustomPanel((Nlm_SlatE)itsSuperior->GetNlmObject(), panelDrawProc, 
  88.                 0/*extra*/, NULL/*panelResetProc*/);
  89.             break;
  90.             
  91.         case subclasscreates:
  92.             return; // this null case used by DDocPanel
  93.         }
  94.     Nlm_SetPanelClick(fPanel, panelClickProc, panelDragProc, panelHoldProc, panelReleaseProc);
  95.     this->SetNlmObject(fPanel);    
  96. }
  97.  
  98. extern "C" void Nlm_ClearPanelData(Nlm_PaneL p); /* in vibslate.c */
  99.  
  100. DPanel::~DPanel()
  101. {
  102.         // this is to stop XWin callbacks -- don't think it is working ...
  103.     //Nlm_ClearPanelData( fPanel);
  104. }
  105.  
  106. void DPanel::SetSlateBorder(Boolean turnon) 
  107. {
  108.      if (fPanelKind == autonomous) 
  109.          Nlm_SetSlateBorder((Nlm_SlatE)fPanel, turnon);  
  110. }
  111.  
  112.  
  113. //void DPanel::Draw() { } // abstract class, user must subclass
  114.  
  115. void DPanel::Scroll(Boolean vertical, DView* scrollee, long newval, long oldval)
  116. {
  117. }
  118.  
  119.  
  120.  
  121. void DPanel::SetTracker( DTracker* mouseTracker)
  122. {
  123.     //if (fTracker) fTracker->SetTracker(mouseTracker);
  124.     fTracker= mouseTracker;
  125. }
  126.  
  127. Nlm_Boolean DPanel::IsDoneTracking()
  128. {
  129.     if (fTracker) return !fMouseStillDown;
  130.     else return true;
  131. }
  132.  
  133. void DPanel::Click(Nlm_PoinT mouse)
  134. {
  135.     // this is always called before Drag/Hold/Release
  136.     // Release is only called if Drag/Hold are called (only if mouse is down for a while)
  137.     fMouseStillDown= false;
  138.     if (fTracker) fTracker= fTracker->Start( mouse);
  139. }
  140.  
  141. void DPanel::Drag(Nlm_PoinT mouse)
  142. {
  143.     fMouseStillDown= true;
  144.     if (fTracker) fTracker= fTracker->Continue( mouse, true);
  145. }
  146.  
  147. void DPanel::Hold(Nlm_PoinT mouse)
  148. {
  149.     fMouseStillDown= true;
  150.     if (fTracker) fTracker= fTracker->Continue( mouse, false);
  151. }
  152.  
  153. void DPanel::Release(Nlm_PoinT mouse)
  154. {
  155.     fMouseStillDown= false;
  156.     if (fTracker) fTracker= fTracker->Finish( mouse);
  157.     if (fTracker) fTracker->Process(); // DoIt, if the command is still here...
  158. }
  159.  
  160. void DPanel::TrackMouse( short aTrackPhase,
  161.                     Nlm_PoinT& anchorPoint, Nlm_PoinT& previousPoint,
  162.                     Nlm_PoinT& nextPoint,    Nlm_Boolean mouseDidMove)
  163. {
  164. }
  165.  
  166. void DPanel::TrackFeedback( short aTrackPhase,
  167.                     const Nlm_PoinT& anchorPoint, const Nlm_PoinT& previousPoint,
  168.                     const Nlm_PoinT& nextPoint, Nlm_Boolean mouseDidMove, Nlm_Boolean turnItOn)
  169. {
  170. }
  171.  
  172.  
  173.  
  174. void DPanel::CharHandler(char c) 
  175. {
  176. }
  177.  
  178.  
  179. //class DAutoPanel : public DPanel
  180.  
  181. DAutoPanel::DAutoPanel(long id, DView* itsSuperior, short pixwidth, short pixheight,
  182.             Boolean hasVscroll, Boolean hasHscroll) :
  183.         DPanel(id, itsSuperior, pixwidth, pixheight, DPanel::subclasscreates)
  184. {
  185.     fPanelKind = DPanel::autonomous;
  186.     Nlm_SltScrlProc vproc= NULL;
  187.     Nlm_SltScrlProc hproc= NULL;
  188.     if (hasVscroll) vproc= panelVscrollProc;
  189.     if (hasHscroll) hproc= panelHscrollProc;
  190.     fPanel= Nlm_AutonomousPanel((Nlm_WindoW)itsSuperior->GetNlmObject(),
  191.       pixwidth, pixheight, panelDrawProc, vproc, hproc, 0/*extra*/, NULL/*panelResetProc*/, 
  192.         NULL/*panelGraphProcPtr*/);
  193.     Nlm_SetSlateChar( (Nlm_SlatE) fPanel, panelCharProc);
  194.     Nlm_SetPanelClick(fPanel, panelClickProc, panelDragProc, panelHoldProc, panelReleaseProc);
  195.     this->SetNlmObject(fPanel);    
  196. }
  197.  
  198.  
  199.  
  200.  
  201. //class DNotePanel : public DPanel
  202.  
  203.  
  204. extern "C" void notepDrawProc(Nlm_IcoN item)
  205. {
  206.     DNotePanel *obj= (DNotePanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  207.     if (obj) obj->Draw();
  208. }
  209.  
  210. extern "C" void notepInvalProc(Nlm_IcoN item, Nlm_Int2 newval, Nlm_Int2 oldval)
  211. {
  212.     DNotePanel *obj= (DNotePanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  213.     if (obj) obj->Invalid(newval, oldval);
  214. }
  215.  
  216. extern "C" void notepClickProc(Nlm_IcoN item, Nlm_PoinT mouse)
  217. {
  218.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  219.     if (obj) obj->Click(mouse);
  220. }
  221.  
  222. extern "C" void notepDragProc(Nlm_IcoN item, Nlm_PoinT mouse)
  223. {
  224.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  225.     if (obj) obj->Drag(mouse);
  226. }
  227.  
  228. extern "C" void notepHoldProc(Nlm_IcoN item, Nlm_PoinT mouse)
  229. {
  230.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  231.     if (obj) obj->Hold(mouse);
  232. }
  233.  
  234. extern "C" void notepReleaseProc(Nlm_IcoN item, Nlm_PoinT mouse)
  235. {
  236.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  237.     if (obj) obj->Release(mouse);
  238. }
  239.  
  240.  
  241.  
  242. DNotePanel::DNotePanel(long id, DView* itsSuperior, const char* title, 
  243.             short pixwidth, short pixheight, Nlm_FonT font, Justify just) :
  244.     DPanel( id, itsSuperior, pixwidth, pixheight, subclasscreates),
  245.     fText(NULL),
  246.     fTextLen(0),
  247.     fFont(font),
  248.     fJust(just),
  249.     fDimmed(false),
  250.     fEnabled(false)
  251. {
  252.     fText= StrDup(title);
  253.     if (fText) fTextLen= StrLen(fText);
  254.     if (pixwidth==0 || pixheight == 0) {
  255.         short width = pixwidth, height = pixheight;
  256.         this->GetSize(width,height);
  257.         if (pixwidth==0) pixwidth= width;
  258.         if (pixheight==0) pixheight= height;
  259.         }
  260.     fIconBut= Nlm_IconButton((Nlm_WindoW)itsSuperior->GetNlmObject(), pixwidth, pixheight, 
  261.         notepDrawProc, notepInvalProc, notepClickProc, notepDragProc, notepHoldProc, notepReleaseProc);
  262.     fPanel= (Nlm_PaneL) fIconBut;
  263.     this->SetNlmObject(fIconBut);    
  264. }
  265.  
  266.  
  267. void DNotePanel::SetTitle( char* title) 
  268. { 
  269.     Nlm_RecT r;
  270.     short width,height,curwidth,curheight;
  271.     
  272.     if (fText) MemFree(fText);
  273.     fText= StrDup(title);
  274.     if (fText) fTextLen= StrLen(fText);
  275.     else fTextLen= 0;
  276.     this->GetPosition(r); // ViewRect
  277.     width= curwidth= r.right - r.left;
  278.     height= curheight= r.bottom - r.top;
  279.     this->GetSize(width,height);
  280.     if (width>curwidth || height>curheight) {
  281.         r.right= r.left + width;
  282.         r.bottom= r.top + height; 
  283.         this->SetPosition(r);
  284.         }
  285.     
  286. }
  287.  
  288. char* DNotePanel::GetTitle(char* title, ulong maxsize) 
  289. { 
  290.     if (title==NULL) title= (char*)MemNew(maxsize);
  291.     StrNCpy( title, fText, maxsize);
  292.     return title;
  293. }
  294.  
  295. void DNotePanel::GetSize(short& width, short& height)
  296. {
  297.     long    nchars, pixwid;
  298.     char    *cp, *cp0;
  299.     short defwidth= width, defheight= height, nlines= 0;
  300.     Nlm_SelectFont(fFont);
  301.     cp0= fText;
  302.     width= 0;
  303.     if (fText) do {
  304.         nlines++;
  305.         cp= Nlm_StrChr(cp0, NEWLINE);  // '\n'  
  306.         if (cp) nchars= cp - cp0;
  307.         else nchars= fTextLen - (cp0 - fText);
  308.         pixwid= Nlm_TextWidth(cp0, nchars);
  309.         
  310.         if (defwidth && pixwid > defwidth) {
  311.             nchars= Min(nchars, 1 + defwidth / Nlm_MaxCharWidth());
  312.             pixwid= Nlm_TextWidth(cp0, nchars);
  313.             while (nchars > 0 && pixwid > defwidth) {
  314.             nchars--;
  315.             pixwid = Nlm_TextWidth (cp0, nchars);
  316.               }
  317.             }
  318.             
  319.         width= Max(width, pixwid);
  320.         if (cp) {
  321.             if (nchars < cp - cp0) cp0 += nchars; 
  322.             else cp0 = 1 + cp;
  323.             }
  324.         else if (cp0 + nchars < fText + fTextLen) {
  325.             cp0= cp0 + nchars;
  326.             cp= cp0;
  327.             }
  328.     } while (cp);
  329.     height= nlines * Nlm_LineHeight();
  330. }
  331.  
  332.  
  333. void DNotePanel::Draw()
  334. {
  335.     if (fText) {
  336.         Nlm_RecT area;
  337.         this->ViewRect( area);
  338.         Nlm_SelectFont(fFont);
  339.         Dgg_DrawTextbox( &area, fText, fTextLen, fJust, fDimmed); 
  340.         }
  341. }
  342.  
  343.  
  344. void DNotePanel::SetDim(Boolean isDim, Boolean redraw)  
  345. {
  346.     fDimmed= isDim;
  347.     if (redraw) this->Draw();
  348. }         
  349.  
  350. void DNotePanel::Enable()  
  351. {
  352.     fEnabled= true;
  353.     DPanel::Enable();
  354. }        
  355.  
  356. void DNotePanel::Disable()  
  357. {
  358.     fEnabled= false;
  359.     DPanel::Disable();
  360. }        
  361.  
  362.  
  363. void DNotePanel::Click(Nlm_PoinT mouse)
  364. {
  365.     if (fEnabled) {
  366.         Nlm_RecT area;
  367.         this->ViewRect( area);
  368.         Nlm_InvertRect( &area);
  369.     }
  370. }
  371.  
  372. void DNotePanel::Release(Nlm_PoinT mouse)
  373. {
  374.     if (fEnabled) {
  375.         Nlm_RecT area;
  376.         this->ViewRect( area);
  377.         Nlm_InvertRect( &area);
  378.         if (Nlm_PtInRect( mouse, &area)) {
  379.             // then button is "selected", otherwise not.
  380.             this->IsMyViewAction(this);
  381.             }
  382.         }
  383. }
  384.  
  385. void DNotePanel::Invalid(short newval, short oldval)
  386. {
  387. }
  388.  
  389.  
  390.  
  391.  
  392.  
  393.  
  394. //class DIconButton : public DPanel
  395.  
  396.  
  397. extern "C" void iconDrawProc(Nlm_IcoN item)
  398. {
  399.     DIconButton *obj= (DIconButton*) Nlm_GetObject( (Nlm_GraphiC)item);
  400.     if (obj) obj->Draw();
  401. }
  402.  
  403. extern "C" void iconInvalProc(Nlm_IcoN item, Nlm_Int2 newval, Nlm_Int2 oldval)
  404. {
  405.     DIconButton *obj= (DIconButton*) Nlm_GetObject( (Nlm_GraphiC)item);
  406.     if (obj) obj->Invalid(newval, oldval);
  407. }
  408.  
  409. extern "C" void iconClickProc(Nlm_IcoN item, Nlm_PoinT mouse)
  410. {
  411.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  412.     if (obj) obj->Click(mouse);
  413. }
  414.  
  415. extern "C" void iconDragProc(Nlm_IcoN item, Nlm_PoinT mouse)
  416. {
  417.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  418.     if (obj) obj->Drag(mouse);
  419. }
  420.  
  421. extern "C" void iconHoldProc(Nlm_IcoN item, Nlm_PoinT mouse)
  422. {
  423.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  424.     if (obj) obj->Hold(mouse);
  425. }
  426.  
  427. extern "C" void iconReleaseProc(Nlm_IcoN item, Nlm_PoinT mouse)
  428. {
  429.     DPanel *obj= (DPanel*) Nlm_GetObject( (Nlm_GraphiC)item);
  430.     if (obj) obj->Release(mouse);
  431. }
  432.  
  433.  
  434.  
  435. // test this iconbutton frame !?
  436. enum {
  437.  kFInset= 2,
  438.  kFInset2= 4,
  439.  fFrame = 1
  440.  };
  441.  
  442. DIconButton::DIconButton(long id, DView* itsSuperior, DIcon* itsIcon):
  443.     DPanel( id, itsSuperior, 0, 0, subclasscreates),
  444.     fEnabled(true),
  445.     fIcon(itsIcon)
  446. {
  447.     short pixwidth, pixheight;
  448.     GetIconSize( pixwidth, pixheight);
  449.     fIconBut= Nlm_IconButton((Nlm_WindoW)itsSuperior->GetNlmObject(), pixwidth, pixheight, 
  450.             iconDrawProc, iconInvalProc, iconClickProc, iconDragProc, iconHoldProc, iconReleaseProc);
  451.     fPanel= (Nlm_PaneL) fIconBut;
  452.     this->SetNlmObject(fIconBut);    
  453. }
  454.  
  455. void DIconButton::GetIconSize(short& pixwidth, short& pixheight) 
  456. {
  457.     if (fIcon) {
  458.         pixwidth= fIcon->fWidth;
  459.         pixheight= fIcon->fHeight;
  460.         }
  461.     else {
  462.         pixwidth= 16;
  463.         pixheight= 16;
  464.         }
  465.     if (fFrame) {  
  466.         pixwidth  += kFInset2;
  467.         pixheight += kFInset2;
  468.         }
  469. }
  470.  
  471. void DIconButton::SetIcon(DIcon* itsIcon, Boolean redraw) 
  472. { 
  473.     Nlm_RecT area;
  474.     fIcon= itsIcon; 
  475.     short pixwidth, pixheight;
  476.     GetIconSize( pixwidth, pixheight);
  477.     this->ViewRect(area);
  478.     area.right = area.left + pixwidth;
  479.     area.bottom= area.top + pixheight;
  480.     this->RegisterRect( area);
  481.     if (redraw) InvalRect( area);
  482. }
  483.  
  484. void DIconButton::Enable()  
  485. {
  486.     if (!fEnabled) { 
  487.         fEnabled= true;
  488.         Invalidate();
  489.         DPanel::Enable();
  490.         }
  491. }        
  492.  
  493. void DIconButton::Disable()  
  494. {
  495.     if (fEnabled) {
  496.         fEnabled= false;
  497.         Invalidate();
  498.         DPanel::Disable();
  499.         }
  500. }        
  501.  
  502. void DIconButton::Draw()
  503. {
  504.     if (fIcon) {
  505.         Nlm_RecT area;
  506.         this->ViewRect( area);
  507.             // gray is usable only on color/grayscale monitors
  508.         if (!fEnabled) Nlm_LtGray(); 
  509.         if (fFrame) {  
  510.             //Nlm_WidePen(2);
  511.              Nlm_FrameRoundRect( &area, 8, 8);
  512.             Nlm_InsetRect( &area, kFInset, kFInset);
  513.             }
  514.         fIcon->Draw( area);
  515.         if (!fEnabled) Nlm_Black();
  516.         }
  517. }
  518.  
  519.  
  520.         // ?? should Invert() be a general DView method ??
  521. void DIconButton::Click(Nlm_PoinT mouse)
  522. {
  523.     if (fEnabled) {
  524.         Nlm_RecT area;
  525.         this->ViewRect( area);
  526.         if (fFrame) Nlm_InsetRect( &area, kFInset, kFInset);
  527.         Nlm_InvertRect( &area);
  528.         }
  529. }
  530.  
  531. void DIconButton::Release(Nlm_PoinT mouse)
  532. {
  533.     if (fEnabled) {
  534.         Nlm_RecT area;
  535.         this->ViewRect( area);
  536.         if (fFrame) Nlm_InsetRect( &area, kFInset, kFInset);
  537.         Nlm_InvertRect( &area);
  538.         if (Nlm_PtInRect( mouse, &area)) {
  539.             // then button is "selected", otherwise not.
  540.             this->IsMyViewAction(this);
  541.             }
  542.         }
  543. }
  544.  
  545.  
  546. void DIconButton::Invalid(short newval, short oldval)
  547. {
  548. }
  549.  
  550.  
  551.  
  552.  
  553.  
  554. //class DSlatePanel : public DPanel
  555.  
  556.  
  557.  
  558.  
  559. //class DSlate : public DView
  560.  
  561. extern "C" void slateScrollProc(Nlm_BaR sb, Nlm_SlatE s, short newval, short oldval)
  562. {
  563.     DScrollBar *obj= (DScrollBar*) Nlm_GetObject( (Nlm_GraphiC)sb);
  564.     DSlate *scrollee= (DSlate*) Nlm_GetObject( (Nlm_GraphiC)s);
  565.     if (obj) obj->Scroll(scrollee, newval, oldval);
  566. }
  567.  
  568. extern "C" void slateCharProc(Nlm_SlatE s, Nlm_Char c)
  569. {
  570.     DSlate *obj= (DSlate*) Nlm_GetObject( (Nlm_GraphiC)s);
  571.     if (obj) obj->CharHandler(c);
  572. }
  573.  
  574.     
  575. DSlate::DSlate(long id, DView* itsSuperior, short width, short height, SlateKind kind) :
  576.         DView( id, NULL, kSlate, itsSuperior) 
  577. {
  578.     switch (kind) {
  579.         case scrolling:
  580.             fSlate= Nlm_ScrollSlate((Nlm_WindoW)itsSuperior->GetNlmObject(), width, height); 
  581.             break;
  582.         case normal:
  583.             fSlate= Nlm_NormalSlate((Nlm_WindoW)itsSuperior->GetNlmObject(), width, height); 
  584.             break;
  585.         case hidden:
  586.             fSlate= Nlm_HiddenSlate((Nlm_WindoW)itsSuperior->GetNlmObject(), width, height); 
  587.             break;
  588.         case general:
  589.             fSlate= Nlm_GeneralSlate((Nlm_WindoW)itsSuperior->GetNlmObject(), width, height, 
  590.                                 slateScrollProc, 0/*extra*/, NULL/*classPtr*/); 
  591.             break;
  592.     
  593.         }
  594.     this->SetNlmObject(fSlate);    
  595. }
  596.  
  597. void DSlate::VirtualSlate( short before, short after) 
  598. {
  599.     Nlm_VirtualSlate( fSlate, before, after, slateScrollProc);
  600. }
  601.  
  602. void DSlate::SetCharHandler() 
  603. {
  604.     Nlm_SetSlateChar( fSlate, slateCharProc);
  605. }
  606.  
  607. void DSlate::CharHandler(char c) 
  608. {
  609. }
  610.  
  611.  
  612.  
  613.  
  614.  
  615.  
  616.  
  617.  
  618. //class DDisplay : public DView    
  619.  
  620. DDisplay::DDisplay(long id, DView* itsSuperior, short width, short height, DisplayKind kind):
  621.     DView( id, NULL, kDisplay, itsSuperior) 
  622. {
  623.     switch (kind) {
  624.         case normal:
  625.             fDisplay= Nlm_NormalDisplay((Nlm_WindoW)itsSuperior->GetNlmObject(), width, height);
  626.             break;
  627.         case scrolling:
  628.             fDisplay= Nlm_ScrollDisplay((Nlm_WindoW)itsSuperior->GetNlmObject(), width, height);
  629.             break;
  630.         }
  631.     this->SetNlmObject(fDisplay);    
  632. }
  633.     
  634.  
  635.  
  636.  
  637.  
  638. //class DDocPanel : public DPanel
  639.  
  640. #if 0
  641. typedef CharPtr (*DocPrntProc)  PROTO((Pointer));
  642. typedef void    (*DocClckProc)  PROTO((DoC, PoinT));
  643. typedef void    (*DocDrawProc)  PROTO((DoC, RectPtr, Int2, Int2));
  644. typedef Boolean (*DocShadeProc) PROTO((DoC, Int2, Int2, Int2));
  645. typedef void    (*DocDataProc)  PROTO((DoC, Pointer));
  646. typedef void    (*DocPanProc)   PROTO((DoC));
  647. typedef void    (*DocFreeProc)  PROTO((DoC, VoidPtr));
  648. #endif
  649.  
  650.  
  651. DDocPanel::DDocPanel(long id, DView* itsSuperior, short pixwidth, short pixheight):
  652.         DPanel(id, itsSuperior, pixwidth, pixheight, DPanel::subclasscreates) 
  653. {
  654.     fDocpanel= Nlm_DocumentPanel( (Nlm_WindoW)itsSuperior->GetNlmObject(), pixwidth, pixheight);
  655.     fPanel= (Nlm_PaneL) fDocpanel;
  656.     Nlm_SetPanelClick(fPanel, panelClickProc, panelDragProc, panelHoldProc, panelReleaseProc);
  657.     this->SetNlmObject(fDocpanel);
  658.     this->SetAutoAdjust(true); // used after append/insert/replace/delete
  659.  
  660.     DWindow* win= this->GetWindow();
  661.     if (win) {
  662.         win->fPrintHandler= this;
  663.         win->fSaveHandler= this;
  664.         }
  665.     
  666.     //Nlm_SetDocProcs(fDocpanel DocClckProc click, DocClckProc drag, DocClckProc release, DocPanProc pan);
  667.     //Nlm_SetDocShade(fDocpanel, DocDrawProc draw, DocShadeProc gray, DocShadeProc invert, DocShadeProc color));
  668. }
  669.     
  670. DDocPanel::~DDocPanel()
  671. {
  672.     //?? need for SetDocData's DocFreeProc call...
  673. }
  674.     
  675. void     DDocPanel::SetData(void* data)
  676. {
  677.     //Nlm_SetDocData(fDocpanel, data, DocFreeProc cleanup); 
  678. }
  679.  
  680. char* DDocPanel::DataToChar(Pointer ptr)  // this is vibrant-document.h CharPrtProc()
  681. {
  682.   if (ptr != NULL) {
  683.     return Nlm_StringSave ((char*)ptr);
  684.   } else {
  685.     return NULL;
  686.   }
  687. }
  688.  
  689. void     DDocPanel::Append( Pointer data, short lines, Nlm_ParPtr parFormat, Nlm_ColPtr colFormat,
  690.                 Nlm_FonT font, Boolean docOwnsData)
  691. {
  692.     Nlm_AppendItem(fDocpanel, NULL/*data2char*/, data, docOwnsData, lines, parFormat, colFormat, font);
  693. }
  694.  
  695.  
  696. void     DDocPanel::Replace( short item, Pointer data, short lines, Nlm_ParPtr parFormat, Nlm_ColPtr colFormat,
  697.                 Nlm_FonT font, Boolean docOwnsData)
  698. {
  699.     // need &DDocPanel::DataToChar in C form (but no object ref to call back !)
  700.     //from: char *(DDocPanel::*Cpp func)(void *) -to-> char *(*C func)(void *)
  701.     Nlm_ReplaceItem(fDocpanel, item, NULL/*data2char*/, data, docOwnsData, lines, parFormat, colFormat, font);
  702. }
  703.  
  704.  
  705. void     DDocPanel::Insert( short item, Pointer data, short lines, Nlm_ParPtr parFormat, Nlm_ColPtr colFormat,
  706.                 Nlm_FonT font, Boolean docOwnsData)
  707. {
  708.     Nlm_InsertItem(fDocpanel, item, NULL/*data2char*/, data, docOwnsData, lines, parFormat, colFormat, font);
  709. }
  710.  
  711.  
  712.  
  713.  
  714.  
  715.  
  716.