home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'EsRollUp.pas' rev: 3.00
-
- #ifndef EsRollUpHPP
- #define EsRollUpHPP
- #include <EsData.hpp>
- #include <EsConst.hpp>
- #include <MMSystem.hpp>
- #include <Messages.hpp>
- #include <Forms.hpp>
- #include <Classes.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Esrollup
- {
- //-- type declarations -------------------------------------------------------
- typedef Shortint TEsAnimateSpeed;
-
- class DELPHICLASS TEsCustomRollUp;
- class PASCALIMPLEMENTATION TEsCustomRollUp : public Classes::TComponent
- {
- typedef Classes::TComponent inherited;
-
- protected:
- bool FAnimate;
- TEsAnimateSpeed FAnimateSpeed;
- bool FHookForm;
- int FMinHeight;
- Classes::TNotifyEvent FOnRollDown;
- Classes::TNotifyEvent FOnRollUp;
- void *ruNewWndProc;
- int ruOldHeight;
- void *ruPrevWndProc;
- bool __fastcall GetRolledUp(void);
- System::AnsiString __fastcall GetVersion();
- void __fastcall SetAnimateSpeed(TEsAnimateSpeed Value);
- void __fastcall SetHookForm(bool Value);
- void __fastcall SetMinHeight(int Value);
- void __fastcall SetRolledUp(bool Value);
- void __fastcall SetVersion(const System::AnsiString Value);
- void __fastcall ruWndProc(Messages::TMessage &Msg);
- DYNAMIC void __fastcall DoOnRollDown(void);
- DYNAMIC void __fastcall DoOnRollUp(void);
- __property bool Animate = {read=FAnimate, write=FAnimate, default=1};
- __property TEsAnimateSpeed AnimateSpeed = {read=FAnimateSpeed, write=FAnimateSpeed, default=8};
- __property bool HookForm = {read=FHookForm, write=SetHookForm, default=0};
- __property int MinHeight = {read=FMinHeight, write=SetMinHeight, nodefault};
- __property bool RolledUp = {read=GetRolledUp, write=SetRolledUp, stored=false, nodefault};
- __property System::AnsiString Version = {read=GetVersion, write=SetVersion, stored=false};
- __property Classes::TNotifyEvent OnRollDown = {read=FOnRollDown, write=FOnRollDown};
- __property Classes::TNotifyEvent OnRollUp = {read=FOnRollUp, write=FOnRollUp};
-
- public:
- __fastcall virtual TEsCustomRollUp(Classes::TComponent* AOwner);
- __fastcall virtual ~TEsCustomRollUp(void);
- };
-
- class DELPHICLASS TEsRollUp;
- class PASCALIMPLEMENTATION TEsRollUp : public Esrollup::TEsCustomRollUp
- {
- typedef Esrollup::TEsCustomRollUp inherited;
-
- __published:
- __property Animate ;
- __property AnimateSpeed ;
- __property HookForm ;
- __property MinHeight ;
- __property RolledUp ;
- __property Version ;
- __property OnRollDown ;
- __property OnRollUp ;
- public:
- /* TEsCustomRollUp.Create */ __fastcall virtual TEsRollUp(Classes::TComponent* AOwner) : Esrollup::
- TEsCustomRollUp(AOwner) { }
- /* TEsCustomRollUp.Destroy */ __fastcall virtual ~TEsRollUp(void) { }
-
- };
-
- //-- var, const, procedure ---------------------------------------------------
- #define ruDefAnimate (bool)(1)
- #define ruDefAnimateSpeed (Byte)(8)
-
- } /* namespace Esrollup */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Esrollup;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // EsRollUp
-