register.cpp

用BCB6.0 生成序列号 和 例子 版权属于ccrun老妖

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

#include <vcl.h>
#pragma hdrstop

#include "Register.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TRegisterForm *RegisterForm;
//---------------------------------------------------------------------------
__fastcall TRegisterForm::TRegisterForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TRegisterForm::RegisterButtonClick(TObject *Sender)
{
        AnsiString TheKey[4];

        TheKey[0]=RegisterEdit1->Text;
        TheKey[1]=RegisterEdit2->Text;
        TheKey[2]=RegisterEdit3->Text;
        TheKey[3]=RegisterEdit4->Text;
        
        if(RegisterEdit1->Text.Length()==4 && RegisterEdit2->Text.Length()==4 && RegisterEdit3->Text.Length()==4 && RegisterEdit4->Text.Length()==4)
        {
                if(CheckKey(TheKey[0].c_str(),0)==true && CheckKey(TheKey[1].c_str(),1)==true && CheckKey(TheKey[2].c_str(),2)==true && CheckKey(TheKey[3].c_str(),3)==true)
                {
                        MessageBox(this->Handle,"注册成功！","提示",MB_OK);
                        this->Close();
                }
                else
                {
                        MessageBox(this->Handle,"对不起！您的注册号输入错误，注册失败！","提示",MB_OK);
                }
        }
        else
        {
                MessageBox(this->Handle,"请正确输入您的注册号！","提示",MB_OK);
        }
        RegisterEdit1->SetFocus();
        RegisterEdit1->SelectAll();
}
//---------------------------------------------------------------------------
bool TRegisterForm::CheckKey(char * Key, int Value)
{
        int Sum=0;
        if(Value==0)
        {
                if(strcmp(Key,"WOYE")==0)
                {
                        return true;
                }
                else
                {
                        return false;
                }
        }
        else
        {
                for(int i=0; i<4; i++)
                        Sum=Sum+Key[i];
                if(Sum % 15 == Value)
                        return true;
                else
                        return false;
        }
}
void __fastcall TRegisterForm::RegisterEdit1Change(TObject *Sender)
{
        if(RegisterEdit1->Text.Length()==4)
                RegisterEdit2->SetFocus();
}
//---------------------------------------------------------------------------

void __fastcall TRegisterForm::RegisterEdit2Change(TObject *Sender)
{
        if(RegisterEdit2->Text.Length()==4)
                RegisterEdit3->SetFocus();
}
//---------------------------------------------------------------------------

void __fastcall TRegisterForm::RegisterEdit3Change(TObject *Sender)
{
        if(RegisterEdit3->Text.Length()==4)
                RegisterEdit4->SetFocus();
}
//---------------------------------------------------------------------------

void __fastcall TRegisterForm::RegisterEdit4Change(TObject *Sender)
{
        if(RegisterEdit4->Text.Length()==4)
                RegisterButton->SetFocus();
}
//---------------------------------------------------------------------------