home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / g / gina15.zip / sample / ibtestappl.C < prev    next >
C/C++ Source or Header  |  1992-02-27  |  3KB  |  107 lines
  1. /* @(#)ibtestappl.C    1.1 11/15/91 */
  2.  
  3. #include <Gina/Gina.h>
  4.  
  5. // Include IB files (specification + implementation)
  6.  
  7. #include "ib-test.h"
  8. #include "ib-test.C"
  9.  
  10. // Define an alias for the new dialog class
  11.  
  12. #define DIALOG_CLASS GnDemoDocumentShell
  13. #define IS_DOC_SHELL
  14.  
  15. // NO CHANGES AFTER HERE !!
  16. // ============================================================================
  17.  
  18. class IbTestApplication : public GnApplication {
  19.   public:
  20.     virtual GnDocument *create_document ();
  21.  
  22.     char * app_class () { return "IbTest" ; }
  23.     char * app_signature() { return "ibtest" ; }
  24.     char * app_file_type() { return ".ibtest" ; }
  25. };
  26.  
  27.  
  28. class IbTestDocument : public GnDocument {
  29.   public:
  30.     virtual void create_windows(int new_width = 0, int new_height = 0);
  31. #ifndef IS_DOC_SHELL
  32.   protected:
  33.     DIALOG_CLASS *dialog;
  34. #endif
  35.   protected:
  36.     void CallManage(GnWidget *w, caddr_t);
  37.     void CallPopup(GnTopLevelToolDialogBox *w, caddr_t);
  38. };
  39.  
  40. GnDocument *IbTestApplication ::
  41. create_document()
  42. { 
  43.     return new IbTestDocument;
  44. }
  45.  
  46. void IbTestDocument ::
  47. create_windows(int new_width, int new_height)
  48. {
  49. #ifdef IS_DOC_SHELL
  50.     main_shell = new DIALOG_CLASS(this, new_width, new_height);
  51.     main_shell->create(APPLICATION->get_application_shell(), "main_shell");
  52. #else
  53.     GnDocument::create_windows(new_width, new_height);
  54.  
  55.     dialog = new DIALOG_CLASS(this);
  56.     dialog->create(main_shell, "dialog");
  57.  
  58.     main_shell->add_menu_command("Dialog", "Manage Dialog",
  59.                  CALLBACK1(IbTestDocument, CallManage, this,
  60.                        GnWidget *, dialog));
  61. #endif
  62.  
  63.     GnToolDialogBox *tool = new GnToolDialogBox;
  64.     tool->create(main_shell, "bla");
  65.  
  66.     GnLabel *lbllbl = new GnLabel("I'm a GnToolDialogBox");
  67.     lbllbl->setR_topAttachment(XmATTACH_WIDGET);
  68.     lbllbl->setR_topWidget(tool->GetMainMenu());
  69.     lbllbl->create(tool, "lbllbl");
  70.  
  71.     main_shell->add_menu_command("Dialog", "Manage Tool-Dialog",
  72.                  CALLBACK1(IbTestDocument, CallManage, this,
  73.                        GnWidget *, tool));
  74.  
  75.     GnTopLevelToolDialogBox *top_tool = new GnTopLevelToolDialogBox;
  76.     top_tool->setR_title("Class => GnTopLevelToolDialogBox");
  77.     top_tool->create(main_shell, "bla");
  78.  
  79.     GnLabel *lbllbllbl = new GnLabel("I'm a GnTopLevelToolDialogBox");
  80.     lbllbllbl->setR_topAttachment(XmATTACH_WIDGET);
  81.     lbllbllbl->setR_topWidget(top_tool->GetMainMenu());
  82.     lbllbllbl->create(top_tool->GetForm(), "lbllbllbl");
  83.  
  84.     main_shell->add_menu_command("Dialog", "GnTopLevelToolDialogBox ...",
  85.                  CALLBACK1(IbTestDocument, CallPopup, this,
  86.                        GnTopLevelToolDialogBox*, top_tool));
  87. }
  88.  
  89. void IbTestDocument::
  90. CallManage(GnWidget *w, caddr_t)
  91. {
  92.     w->manage();
  93. }
  94.  
  95. void IbTestDocument::
  96. CallPopup(GnTopLevelToolDialogBox *w, caddr_t)
  97. {
  98.     w->pop_up();
  99. }
  100.  
  101. int main (unsigned int argc, char ** argv)
  102. {
  103.     IbTestApplication app;
  104.  
  105.     app.run ( argc, argv );
  106. }
  107.