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) 'AHMTFormSaver.pas' rev: 3.00
-
- #ifndef AHMTFormSaverHPP
- #define AHMTFormSaverHPP
- #include <AHMTFormHook.hpp>
- #include <AHMSystem.hpp>
- #include <AHMTStoreData.hpp>
- #include <Controls.hpp>
- #include <Forms.hpp>
- #include <Classes.hpp>
- #include <SysUtils.hpp>
- #include <Messages.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Ahmtformsaver
- {
- //-- type declarations -------------------------------------------------------
- typedef void __fastcall (__closure *TAHMOnStoreControl)(System::TObject* Sender, bool &Result);
-
- class DELPHICLASS TAHMFormSaver;
- class PASCALIMPLEMENTATION TAHMFormSaver : public Ahmtformhook::TAHMHookComponent
- {
- typedef Ahmtformhook::TAHMHookComponent inherited;
-
- private:
- Ahmtstoredata::TAHMDataStore* FFormStore;
- bool FLocal;
- bool FStoreSize;
- bool FStoreLocation;
- bool FStoreState;
- bool FStoreVisible;
- bool FStoreControls;
- Forms::TForm* FMyForm;
- int intRestoreLeft;
- int intRestoreTop;
- int intRestoreWidth;
- int intRestoreHeight;
- bool bolWindowStateSet;
- Classes::TNotifyEvent FOnShow;
- Forms::TCloseEvent FOnClose;
- Classes::TNotifyEvent FOnStore;
- TAHMOnStoreControl FOnStoreControl;
- Classes::TNotifyEvent FOnRestore;
- void __fastcall StoreControl(Controls::TControl* TheControl);
- void __fastcall RestoreControl(Controls::TControl* TheControl);
- void __fastcall StoreWindow(Forms::TForm* TheForm);
- void __fastcall RestoreWindow(Forms::TForm* TheForm);
- void __fastcall MyStore(System::TObject* Sender, Forms::TCloseAction &Action);
- void __fastcall MyRestore(System::TObject* Sender);
-
- protected:
- void __fastcall BeforeMaximize(void);
-
- public:
- __fastcall virtual TAHMFormSaver(Classes::TComponent* AOwner);
- __fastcall virtual ~TAHMFormSaver(void);
- virtual void __fastcall Hooked(Messages::TMessage &AMsg);
- void __fastcall Store(void);
- void __fastcall Restore(void);
- int __fastcall ReadInt(System::AnsiString Section, int Error);
- System::AnsiString __fastcall ReadStr(System::AnsiString Section, System::AnsiString Error);
- bool __fastcall ReadBool(System::AnsiString Section, bool Error);
-
- __published:
- __property Ahmtstoredata::TAHMDataStore* FormStore = {read=FFormStore, write=FFormStore};
- __property bool StoreSize = {read=FStoreSize, write=FStoreSize, default=1};
- __property bool StoreLocation = {read=FStoreLocation, write=FStoreLocation, default=1};
- __property bool StoreState = {read=FStoreState, write=FStoreState, default=1};
- __property bool StoreVisible = {read=FStoreVisible, write=FStoreVisible, default=1};
- __property bool StoreControls = {read=FStoreControls, write=FStoreControls, nodefault};
- __property Classes::TNotifyEvent OnStore = {read=FOnStore, write=FOnStore};
- __property TAHMOnStoreControl OnStoreControl = {read=FOnStoreControl, write=FOnStoreControl};
- __property Classes::TNotifyEvent OnRestore = {read=FOnRestore, write=FOnRestore};
- };
-
- //-- var, const, procedure ---------------------------------------------------
-
- } /* namespace Ahmtformsaver */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Ahmtformsaver;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // AHMTFormSaver
-