home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmstanc / _setup.1 / AHMTAnimator.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-12-05  |  3.1 KB  |  90 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTAnimator.pas' rev: 3.00
  6.  
  7. #ifndef AHMTAnimatorHPP
  8. #define AHMTAnimatorHPP
  9. #include <AHMSControls.hpp>
  10. #include <Controls.hpp>
  11. #include <Classes.hpp>
  12. #include <SysUtils.hpp>
  13. #include <Windows.hpp>
  14. #include <SysInit.hpp>
  15. #include <System.hpp>
  16.  
  17. //-- user supplied -----------------------------------------------------------
  18.  
  19. namespace Ahmtanimator
  20. {
  21. //-- type declarations -------------------------------------------------------
  22. enum TAHMState { sOpen, sClosed, sBusy };
  23.  
  24. class DELPHICLASS TAHMAnimator;
  25. class PASCALIMPLEMENTATION TAHMAnimator : public Controls::TWinControl 
  26. {
  27.     typedef Controls::TWinControl inherited;
  28.     
  29. private:
  30.     Ahmscontrols::TAHMAboutSControlStr FAboutStr;
  31.     short FPlayFrom;
  32.     short FPlayTo;
  33.     short FCycles;
  34.     TAHMState FState;
  35.     System::AnsiString FAVIName;
  36.     bool fAutoAni;
  37.     bool FCenter;
  38.     bool FTransparent;
  39.     void __fastcall SetPlayRange(void);
  40.     void __fastcall SetPlayFrom(short FromFrame);
  41.     void __fastcall SetPlayTo(short ToFrame);
  42.     void __fastcall SetCycles(short nCycles);
  43.     void __fastcall SetAVIName(System::AnsiString aName);
  44.     void __fastcall SetState(TAHMState aState);
  45.     void __fastcall SetCenter(bool NewValue);
  46.     void __fastcall SetTransparent(bool NewValue);
  47.     void __fastcall SetAutoPlay(bool NewValue);
  48.     void __fastcall SetAllData(void);
  49.     
  50. protected:
  51.     virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
  52.     virtual void __fastcall CreateWnd(void);
  53.     
  54. public:
  55.     __fastcall virtual TAHMAnimator(Classes::TComponent* AOwner);
  56.     __fastcall virtual ~TAHMAnimator(void);
  57.     void __fastcall OpenResource(int ResID);
  58.     void __fastcall OpenAVIFile(System::AnsiString Filename);
  59.     virtual void __fastcall Loaded(void);
  60.     
  61. __published:
  62.     __property Ahmscontrols::TAHMAboutSControlStr About = {read=FAboutStr, write=FAboutStr};
  63.     __property Enabled ;
  64.     __property Visible ;
  65.     __property OnMouseDown ;
  66.     __property OnMouseMove ;
  67.     __property OnMouseUp ;
  68.     __property System::AnsiString Filename = {read=FAVIName, write=SetAVIName};
  69.     __property bool Center = {read=FCenter, write=SetCenter, default=1};
  70.     __property bool Transparent = {read=FTransparent, write=SetTransparent, default=1};
  71.     __property short PlayFrom = {read=FPlayFrom, write=SetPlayFrom, default=0};
  72.     __property short PlayTo = {read=FPlayTo, write=SetPlayTo, default=-1};
  73.     __property short Cycles = {read=FCycles, write=SetCycles, default=-1};
  74.     __property TAHMState Action = {read=FState, write=SetState, default=1};
  75.     __property bool AutoAnimate = {read=fAutoAni, write=SetAutoPlay, default=1};
  76. public:
  77.     /* TWinControl.CreateParented */ __fastcall TAHMAnimator(HWND ParentWindow) : Controls::TWinControl(
  78.         ParentWindow) { }
  79.     
  80. };
  81.  
  82. //-- var, const, procedure ---------------------------------------------------
  83.  
  84. }    /* namespace Ahmtanimator */
  85. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  86. using namespace Ahmtanimator;
  87. #endif
  88. //-- end unit ----------------------------------------------------------------
  89. #endif    // AHMTAnimator
  90.