programming reaction

[jonssonj]

So, now I have been able to:

1. Open a picasso96Screen
2. Open a reaction window on that screen
3. Get the window lists to show up.
4. Get the "GetScreenModeObject" to show in one of the tabs.

What I can´t solve, is how do I set the ID for the
GetScreenModeObject? How do I listen on events for this ojbect?

My reaction window code looks like this:

Code: [Select]


     window = WindowObject,
         WINDOW_Position, WPOS_CENTERSCREEN,
         WINDOW_VertProp, TRUE,
         WINDOW_HorizProp, TRUE,
         WA_CustomScreen, screen,
         WA_Width, def_width,
         WA_Height, def_height,
         WA_Activate, TRUE,
         WA_Title, "Clicktab.gadget demo",
         WA_DragBar, TRUE,
         WA_CloseGadget, TRUE,
         WA_DepthGadget, TRUE,
         WA_SizeGadget, TRUE,
         WA_IDCMP, IDCMP_CLOSEWINDOW|IDCMP_GADGETUP,
         WINDOW_Layout, VLayoutObject,
             LAYOUT_DeferLayout, TRUE,
             LAYOUT_SpaceInner, TRUE,
             LAYOUT_SpaceOuter, TRUE,
             LAYOUT_AddChild, clicktab = ClickTabObject,
                 GA_Text,tabnames,

                 CLICKTAB_PageGroup, page = PageObject,
                     PAGE_Add, LayoutObject,
                         LAYOUT_AddImage, LabelObject,
                             LABEL_Text, "Page 1",
                         LabelEnd,

                         LAYOUT_FixedVert, FALSE,
                         LAYOUT_SpaceInner, TRUE,
                         LAYOUT_SpaceOuter, TRUE,
                          StartMember, screenmode =
GetScreenModeObject,

                             End,
                     LayoutEnd,

                     PAGE_Add, LayoutObject,
                         LAYOUT_AddImage, LabelObject,
                             LABEL_Text, "Page 2",
                         LabelEnd,
                         CHILD_WeightedWidth, 0,
                         CHILD_WeightedHeight, 0,
                     LayoutEnd,

                     PAGE_Add, LayoutObject,
                         LAYOUT_AddImage, LabelObject,
                             LABEL_Text, "Page 3",
                         LabelEnd,
                     LayoutEnd,
                 PageEnd,
             End,
         LayoutEnd,
     WindowEnd;



And my window listening code looks like this:

Code: [Select]


     GetAttr(WINDOW_SigMask, window, &windowsignal);

     end = FALSE;
     while (!end)
     {
         receivedsignal = Wait(windowsignal);
         while ((result = DoMethod(window, WM_HANDLEINPUT, &code)) !=
WMHI_LASTMSG)
         {
             switch (result & WMHI_CLASSMASK)
             {
                 case WMHI_CLOSEWINDOW:
                     end=TRUE;
                     break;
                 case WMHI_GADGETUP:
                     switch(result & WMHI_GADGETMASK)
                     {

                     case ?? (what constant should I use here) ??:

Code: [Select]


                         printf("Screenmode gadget pressed %ld (Code:
%ld)", (result & WMHI_GADGETMASK), code );
                         break;

                     }
                     break;
             }
         }
     }
     DoMethod(window,WM_CLOSE);
     cleanexit(NULL);




BR
JJ

[Thomas]

Code: [Select]



#define MY_GADGET_ID 4711

...

anygadgetObject,
   GA_ID,MY_GADGET_ID,
   GA_RelVerify,TRUE,
End,

...

case MY_GADGET_ID:
...


Bye,
Thomas