home *** CD-ROM | disk | FTP | other *** search
/ Kompuutteri K-CD 2002 #1 / K-CD_2002-01.iso / Delphi / INFO / Extras / RegCleanUtility / Source / Unit2.h < prev    next >
Encoding:
C/C++ Source or Header  |  2001-05-22  |  1.4 KB  |  53 lines
  1. //---------------------------------------------------------------------------
  2.  
  3. #ifndef Unit2H
  4. #define Unit2H
  5.  
  6. #define MSG_REMOVED 110
  7. #define MSG_FAILED 111
  8. #define MSG_NOTFOUND 112
  9. #define MSG_SUCCESS 113
  10. #define MSG_PARTSUCCESS 114
  11. #define MSG_COMPLETEFAILED 115
  12. #define MSG_REMOVEDBX 116
  13. #define TITLE_INFO 117
  14. //---------------------------------------------------------------------------
  15. #include <Classes.hpp>
  16. #include <Controls.hpp>
  17. #include <StdCtrls.hpp>
  18. #include <Forms.hpp>
  19. #include <ExtCtrls.hpp>
  20. #include <Graphics.hpp>
  21. #include <Registry.hpp>
  22. //---------------------------------------------------------------------------
  23.  
  24.  
  25.  
  26. class TForm2 : public TForm
  27. {
  28. __published:    // IDE-managed Components
  29.     TButton *Button1;
  30.     TImage *Image1;
  31.     TBevel *Bevel1;
  32.     TLabel *Label2;
  33.     TLabel *Label3;
  34.     TMemo *Memo1;
  35.     void __fastcall Button2Click(TObject *Sender);
  36.     void __fastcall CleanupReg(TObject *Sender);
  37.     void __fastcall Button1Click(TObject *Sender);
  38. private:    // User declarations
  39.     TRegistry *Reg;
  40.     //int CleanMSIReg();
  41.     int CleanDelphiReg(String);
  42.     int CleanShortcuts();
  43.     int RemoveKey(String);
  44. public:        // User declarations
  45.     __fastcall TForm2(TComponent* Owner);
  46. };
  47. //---------------------------------------------------------------------------
  48. extern PACKAGE TForm2 *Form2;
  49. //---------------------------------------------------------------------------
  50. #endif
  51.  
  52.  
  53.