wizard.h

著名的SecureBlackBox控件完整源码

//---------------------------------------------------------------------------

#ifndef WizardH
#define WizardH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>

#include "Math.hpp"
#include "SBPGPKeys.hpp"
#include "SBPGPUtils.hpp"
#include "SBPGPConstants.hpp"
//---------------------------------------------------------------------------
class TfrmWizard : public TForm
{
__published:	// IDE-managed Components
        TPanel *pnlStep4;
        TBevel *bvlStep4Top;
        TPanel *pnlStep4Top;
        TLabel *lblStep4Caption;
        TLabel *lblStep4Description;
        TPanel *pnlStep5;
        TBevel *bvlStep5Top;
        TPanel *pnlStep5Top;
        TLabel *lblStep5Caption;
        TLabel *lblStep5Description;
        TPanel *pnlStep6;
        TBevel *bvlStep6Top;
        TPanel *pnlStep6Top;
        TLabel *lblStep6Caption;
        TLabel *lblStep6Description;
        TPanel *pnlStep1;
        TBevel *bvlStep1Top;
        TLabel *lblStep1Prompt;
        TLabel *lblName;
        TLabel *lblEMail;
        TLabel *lblKeyType;
        TLabel *lblKeyExpiration;
        TLabel *lblKeySize;
        TPanel *pnlStep1Top;
        TLabel *lblStep1Caption;
        TLabel *lblStep1Description;
        TEdit *edtName;
        TEdit *edtEMail;
        TComboBox *cmbKeyType;
        TRadioButton *rbtNever;
        TDateTimePicker *dtpExpirationDate;
        TRadioButton *rbtDate;
        TComboBox *cmbKeySize;
        TPanel *pnlStep2;
        TBevel *bvlStep2Top;
        TLabel *lblStep2Prompt;
        TLabel *lblPassword;
        TLabel *lblConfirmation;
        TPanel *pnlStep2Top;
        TLabel *lblStep2Caption;
        TLabel *lblStep2Description;
        TEdit *edtPassword;
        TEdit *edtConfirmation;
        TPanel *pnlStep3;
        TBevel *bvlStep3Top;
        TLabel *lblStep3Prompt;
        TPanel *pnlStep3Top;
        TLabel *lblStep3Caption;
        TLabel *lblStep3Description;
        TProgressBar *pbrProgress;
        TPanel *pnlButtons;
        TBevel *bvlButtonsTop;
        TButton *btnBack;
        TButton *btnNext;
        TButton *btnCancel;
        TButton *btnFinish;
        TTimer *tmrProgress;
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall btnBackClick(TObject *Sender);
        void __fastcall btnNextClick(TObject *Sender);
        void __fastcall pnlStep1Enter(TObject *Sender);
        void __fastcall pnlStep2Enter(TObject *Sender);
        void __fastcall pnlStep2Exit(TObject *Sender);
        void __fastcall pnlStep3Enter(TObject *Sender);
        void __fastcall rbtDateClick(TObject *Sender);
        void __fastcall edtNameChange(TObject *Sender);
        void __fastcall tmrProgressTimer(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
private:	// User declarations
        int FStep;
        int FCount;
        TPanel* FSteps[6];//: array [1..6] of TPanel;
public:		// User declarations
        __fastcall TfrmWizard(TComponent* Owner);

        bool FCompleted;
        TElPGPSecretKey* FSecKey;

};

class TKeyGenerationThread : public TThread
{
friend class TfrmWizard;
private:
        //FForm: TKeyWizardForm;
        Exception* FException;
        TfrmWizard* frmWizard;
        void __fastcall RaiseException(void);
protected:
        virtual void __fastcall DoTerminate(void); // override;
        TKeyGenerationThread(TfrmWizard *AWizard);
        virtual void __fastcall Execute(void); // override;

};

//---------------------------------------------------------------------------
extern PACKAGE TfrmWizard *frmWizard;
//---------------------------------------------------------------------------
#endif