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) 'AHMTFileOperator.pas' rev: 3.00
-
- #ifndef AHMTFileOperatorHPP
- #define AHMTFileOperatorHPP
- #include <ShellAPI.hpp>
- #include <AHMSystem.hpp>
- #include <SysUtils.hpp>
- #include <Classes.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Ahmtfileoperator
- {
- //-- type declarations -------------------------------------------------------
- enum TAHMFileFlag { opAllowUndo, opConfirmMouse, opFilesOnly, opMultiDestFiles, opNoConfirmation, opNoConfirmMkDir,
- opRenameOnCollision, opSilent, opSimpleProgress, opWantMappingHandle };
-
- typedef Set<TAHMFileFlag, opAllowUndo, opWantMappingHandle> TAHMFileFlags;
-
- enum TAHMFileFunction { CopyFile, DeleteFile, MoveFile, RenameFile };
-
- class DELPHICLASS TAHMFileOperator;
- class PASCALIMPLEMENTATION TAHMFileOperator : public Ahmsystem::TAHMExecuteComponent
- {
- typedef Ahmsystem::TAHMExecuteComponent inherited;
-
- private:
- _SHFILEOPSTRUCTA FData;
- Classes::TStrings* FFilesFrom;
- System::AnsiString FNotifFile;
- System::AnsiString FDirTo;
- System::AnsiString FDirFrom;
- Classes::TNotifyEvent FOnDone;
- Classes::TNotifyEvent FOnSuccessRename;
- Classes::TNotifyEvent FOnSuccessDelete;
- Classes::TNotifyEvent FOnSuccessCopy;
- Classes::TNotifyEvent FOnSuccessMove;
- Classes::TNotifyEvent FOnFailRename;
- Classes::TNotifyEvent FOnFailDelete;
- Classes::TNotifyEvent FOnFailCopy;
- Classes::TNotifyEvent FOnFailMove;
- TAHMFileFunction FOperation;
- void __fastcall SetFilesFrom(Classes::TStrings* Value);
- void __fastcall SetFlags(TAHMFileFlags Value);
- void __fastcall SetOperFlag(Cardinal F, bool V);
- TAHMFileFlags __fastcall GetFlags(void);
- bool __fastcall GetOperFlag(Cardinal F);
-
- public:
- __fastcall virtual TAHMFileOperator(Classes::TComponent* AOwner);
- __fastcall virtual ~TAHMFileOperator(void);
- virtual bool __fastcall Execute(void);
- __property System::AnsiString NotifFile = {read=FNotifFile};
-
- __published:
- __property Classes::TStrings* FilesFrom = {read=FFilesFrom, write=SetFilesFrom};
- __property System::AnsiString DirFrom = {read=FDirFrom, write=FDirFrom};
- __property System::AnsiString DirTo = {read=FDirTo, write=FDirTo};
- __property TAHMFileFunction Operation = {read=FOperation, write=FOperation, default=0};
- __property TAHMFileFlags Flags = {read=GetFlags, write=SetFlags, default=33};
- __property Classes::TNotifyEvent OnSuccessRename = {read=FOnSuccessRename, write=FOnSuccessRename};
-
- __property Classes::TNotifyEvent OnSuccessCopy = {read=FOnSuccessCopy, write=FOnSuccessCopy};
- __property Classes::TNotifyEvent OnSuccessDelete = {read=FOnSuccessDelete, write=FOnSuccessDelete};
-
- __property Classes::TNotifyEvent OnSuccessMove = {read=FOnSuccessMove, write=FOnSuccessMove};
- __property Classes::TNotifyEvent OnFailRename = {read=FOnFailRename, write=FOnFailRename};
- __property Classes::TNotifyEvent OnFailCopy = {read=FOnFailCopy, write=FOnFailCopy};
- __property Classes::TNotifyEvent OnFailDelete = {read=FOnFailDelete, write=FOnFailDelete};
- __property Classes::TNotifyEvent OnFailMove = {read=FOnFailMove, write=FOnFailMove};
- __property Classes::TNotifyEvent OnDone = {read=FOnDone, write=FOnDone};
- };
-
- //-- var, const, procedure ---------------------------------------------------
-
- } /* namespace Ahmtfileoperator */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Ahmtfileoperator;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // AHMTFileOperator
-