test/Zune/col.c

   1 /*
   2     Copyright © 2002, The AROS Development Team.
   3     All rights reserved.
   4
   5     $Id$
   6 */
   7
   8 #include <exec/types.h>
   9 #include <stdlib.h>
  10 #include <stdio.h>
  11 #include <string.h>
  12
  13 #include <dos/dos.h>
  14 #include <intuition/gadgetclass.h>
  15 #include <intuition/icclass.h>
  16 #include <proto/exec.h>
  17 #include <proto/intuition.h>
  18 #include <proto/muimaster.h>
  19 #include <clib/alib_protos.h>
  20
  21 /* the following should go in a single include file which then only
  22 ** constits of the public constants and members. Actually this is easiey
  23 */
  24
  25 #include <libraries/mui.h>
  26
  27 #define DEBUG 1
  28 #include <aros/debug.h>
  29
  30 Object *app;
  31
  32 Object *MakeLabel(STRPTR str)
  33 {
  34   return (MUI_MakeObject(MUIO_Label, str, 0));
  35 }
  36
  37 int main(void)
  38 {
  39     Object *wnd;
  40     Object *img;
  41     Object *a, *b, *c, *d;
  42
  43     app = ApplicationObject,
  44         SubWindow, wnd = WindowObject,
  45             MUIA_Window_Title, "col",
  46             MUIA_Window_Activate, TRUE,
  47             WindowContents, d = HGroup,
  48                    GroupFrameT("Background"),
  49                                Child, c = VGroup,
  50                    Child, a = PopimageObject, End,
  51                    Child, b = MakeLabel("Window"),
  52                                End,
  53                                Child, VGroup,
  54                    Child, PopimageObject, End,
  55                    Child, MakeLabel("Requester"),
  56                                End,
  57         End,
  58         End,
  59         End;
  60
  61     if (app)
  62     {
  63         ULONG sigs = 0;
  64         DoMethod(wnd, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
  65         set(wnd, MUIA_Window_Open, TRUE);
  66
  67         printf("%d[%p] %d[%p] %d[%p] %d\n", _maxwidth(a), a, _maxwidth(b), b, _maxwidth(c), c, _maxwidth(d));
  68
  69         while((LONG) DoMethod(app, MUIM_Application_NewInput, &sigs) != MUIV_Application_ReturnID_Quit)
  70         {
  71             if (sigs)
  72             {
  73                 sigs = Wait(sigs | SIGBREAKF_CTRL_C | SIGBREAKF_CTRL_D);
  74                 if (sigs & SIGBREAKF_CTRL_C) break;
  75
  76             }
  77         }
  78         set(wnd, MUIA_Window_Open, FALSE);
  79         MUI_DisposeObject(app);
  80     }
  81
  82     return 0;
  83 }
  84