home *** CD-ROM | disk | FTP | other *** search
- #include <CITTimer.h>
- #include <CITGroup.h>
- #include <CITButton.h>
- #include <CITFuelGauge.h>
-
- CITApp Application;
-
- CITTimer timer;
- CITWorkbench DemoScreen;
- CITWindow DemoWindow;
- CITVGroup winGroup;
- CITFuelGauge fuel;
- CITButton quitButton;
-
-
- void timerEvent();
- void CloseEvent();
- void QuitEvent(ULONG ID);
-
- int main(void)
- {
- BOOL Error=FALSE;
-
- DemoScreen.InsObject(DemoWindow,Error);
- DemoWindow.Position(WPOS_CENTERSCREEN);
- DemoWindow.CloseGadget();
- DemoWindow.DragBar();
- DemoWindow.SizeGadget();
- DemoWindow.DepthGadget();
- DemoWindow.IconifyGadget();
- DemoWindow.Activate();
- DemoWindow.Caption("CITTimer Test");
- DemoWindow.CloseEventHandler(CloseEvent);
- DemoWindow.InsObject(winGroup,Error);
- winGroup.SpaceOuter();
- winGroup.InsObject(fuel,Error);
- fuel.LabelText("Level");
- winGroup.InsObject(quitButton,Error);
- quitButton.Text("Quit");
- quitButton.MaxHeight(30);
- quitButton.EventHandler(QuitEvent);
-
- Application.InsObject(timer,Error);
- Application.InsObject(DemoScreen,Error);
-
- // Ok?
- if( Error )
- return 10;
-
- timer.AddEvent(0.2,timerEvent,0);
-
- Application.Run();
-
- return 0;
- }
-
-
- int value = 0;
- int step = 1;
-
- void timerEvent()
- {
- value += step;
- if( value > 100 )
- {
- step = -step;
- value = 100 + step;
- }
- else if( value < 0 )
- {
- step = -step;
- value = step;
- }
-
- fuel.Level(value);
- timer.AddEvent(0.2,timerEvent,0);
- }
-
- void QuitEvent(ULONG ID)
- {
- Application.Stop();
- }
-
- void CloseEvent()
- {
- Application.Stop();
- }
-