home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmsyscm / _setup.1 / AHMTFileOperator.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-11-12  |  3.6 KB  |  89 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) 'AHMTFileOperator.pas' rev: 3.00
  6.  
  7. #ifndef AHMTFileOperatorHPP
  8. #define AHMTFileOperatorHPP
  9. #include <ShellAPI.hpp>
  10. #include <AHMSystem.hpp>
  11. #include <SysUtils.hpp>
  12. #include <Classes.hpp>
  13. #include <Windows.hpp>
  14. #include <SysInit.hpp>
  15. #include <System.hpp>
  16.  
  17. //-- user supplied -----------------------------------------------------------
  18.  
  19. namespace Ahmtfileoperator
  20. {
  21. //-- type declarations -------------------------------------------------------
  22. enum TAHMFileFlag { opAllowUndo, opConfirmMouse, opFilesOnly, opMultiDestFiles, opNoConfirmation, opNoConfirmMkDir, 
  23.     opRenameOnCollision, opSilent, opSimpleProgress, opWantMappingHandle };
  24.  
  25. typedef Set<TAHMFileFlag, opAllowUndo, opWantMappingHandle>  TAHMFileFlags;
  26.  
  27. enum TAHMFileFunction { CopyFile, DeleteFile, MoveFile, RenameFile };
  28.  
  29. class DELPHICLASS TAHMFileOperator;
  30. class PASCALIMPLEMENTATION TAHMFileOperator : public Ahmsystem::TAHMExecuteComponent 
  31. {
  32.     typedef Ahmsystem::TAHMExecuteComponent inherited;
  33.     
  34. private:
  35.     _SHFILEOPSTRUCTA FData;
  36.     Classes::TStrings* FFilesFrom;
  37.     System::AnsiString FNotifFile;
  38.     System::AnsiString FDirTo;
  39.     System::AnsiString FDirFrom;
  40.     Classes::TNotifyEvent FOnDone;
  41.     Classes::TNotifyEvent FOnSuccessRename;
  42.     Classes::TNotifyEvent FOnSuccessDelete;
  43.     Classes::TNotifyEvent FOnSuccessCopy;
  44.     Classes::TNotifyEvent FOnSuccessMove;
  45.     Classes::TNotifyEvent FOnFailRename;
  46.     Classes::TNotifyEvent FOnFailDelete;
  47.     Classes::TNotifyEvent FOnFailCopy;
  48.     Classes::TNotifyEvent FOnFailMove;
  49.     TAHMFileFunction FOperation;
  50.     void __fastcall SetFilesFrom(Classes::TStrings* Value);
  51.     void __fastcall SetFlags(TAHMFileFlags Value);
  52.     void __fastcall SetOperFlag(Cardinal F, bool V);
  53.     TAHMFileFlags __fastcall GetFlags(void);
  54.     bool __fastcall GetOperFlag(Cardinal F);
  55.     
  56. public:
  57.     __fastcall virtual TAHMFileOperator(Classes::TComponent* AOwner);
  58.     __fastcall virtual ~TAHMFileOperator(void);
  59.     virtual bool __fastcall Execute(void);
  60.     __property System::AnsiString NotifFile = {read=FNotifFile};
  61.     
  62. __published:
  63.     __property Classes::TStrings* FilesFrom = {read=FFilesFrom, write=SetFilesFrom};
  64.     __property System::AnsiString DirFrom = {read=FDirFrom, write=FDirFrom};
  65.     __property System::AnsiString DirTo = {read=FDirTo, write=FDirTo};
  66.     __property TAHMFileFunction Operation = {read=FOperation, write=FOperation, default=0};
  67.     __property TAHMFileFlags Flags = {read=GetFlags, write=SetFlags, default=33};
  68.     __property Classes::TNotifyEvent OnSuccessRename = {read=FOnSuccessRename, write=FOnSuccessRename};
  69.         
  70.     __property Classes::TNotifyEvent OnSuccessCopy = {read=FOnSuccessCopy, write=FOnSuccessCopy};
  71.     __property Classes::TNotifyEvent OnSuccessDelete = {read=FOnSuccessDelete, write=FOnSuccessDelete};
  72.         
  73.     __property Classes::TNotifyEvent OnSuccessMove = {read=FOnSuccessMove, write=FOnSuccessMove};
  74.     __property Classes::TNotifyEvent OnFailRename = {read=FOnFailRename, write=FOnFailRename};
  75.     __property Classes::TNotifyEvent OnFailCopy = {read=FOnFailCopy, write=FOnFailCopy};
  76.     __property Classes::TNotifyEvent OnFailDelete = {read=FOnFailDelete, write=FOnFailDelete};
  77.     __property Classes::TNotifyEvent OnFailMove = {read=FOnFailMove, write=FOnFailMove};
  78.     __property Classes::TNotifyEvent OnDone = {read=FOnDone, write=FOnDone};
  79. };
  80.  
  81. //-- var, const, procedure ---------------------------------------------------
  82.  
  83. }    /* namespace Ahmtfileoperator */
  84. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  85. using namespace Ahmtfileoperator;
  86. #endif
  87. //-- end unit ----------------------------------------------------------------
  88. #endif    // AHMTFileOperator
  89.