⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 passwordsetu.cpp

📁 这是个16路采集器的上位机源码。该套程序是由C++builder开发的
💻 CPP
字号:
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "PasswordSetU.h"
#include "MainU.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "Button3D"
#pragma resource "*.dfm"
TPasswordSetFrm *PasswordSetFrm;
//---------------------------------------------------------------------------
__fastcall TPasswordSetFrm::TPasswordSetFrm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TPasswordSetFrm::CheckBox1Click(TObject *Sender)
{
  Label2->Enabled=!CheckBox1->Checked;
  Label3->Enabled=!CheckBox1->Checked;
  Edit2->Enabled=!CheckBox1->Checked;
  Edit3->Enabled=!CheckBox1->Checked;
}
//---------------------------------------------------------------------------
void __fastcall TPasswordSetFrm::Button1Click(TObject *Sender)
{/*
  if(Edit1->Text==MainFrm->password)
   { AnsiString FileName="pas.pak";
     MainFrm->outfile.open(FileName.c_str());
     if(CheckBox1->Checked)
       { //MainFrm->enpassword='0';
         MainFrm->outfile<<"0"<<"???";
         ShowMessage("密码已取消!");
         MainFrm->outfile.close();
         this->Close();
       }
     else
       if(Edit2->Text==Edit3->Text)
       { //MainFrm->enpassword='1';
         //MainFrm->password=AnsiString(Edit2->Text).c_str();
         MainFrm->outfile<<"1"<<AnsiString(Edit2->Text).c_str();
         ShowMessage("密码修改成功!");
         MainFrm->outfile.close();
         this->Close();
       }
       else
        { Application->MessageBox("两次密码不一致!","警告!",MB_ICONWARNING);
          Edit2->Text="";
          Edit3->Text="";
          MainFrm->outfile.close();
        }
    }
   else
    Application->MessageBox("旧密码错误!","错误!",MB_ICONERROR);
*/
   AnsiString Temp="";
   if(Edit1->Text==AnsiString(MainFrm->password))
   { AnsiString FileName="pas.pak";
     MainFrm->outfile.open(FileName.c_str());
     if(CheckBox1->Checked)
       { //MainFrm->enpassword='0';
         MainFrm->outfile<<"0"<<"???";
         ShowMessage("密码已取消!");
         MainFrm->outfile.close();
         this->Close();
       }
     else
       if(Edit2->Text==Edit3->Text)
       {
         //MainFrm->enpassword='1';
         //MainFrm->password=AnsiString(Edit2->Text).c_str();
         StrCopy(MainFrm->password,Edit2->Text.c_str());
         //加密
         for(int i=0;i<Edit2->Text.Length();i++)
          Temp+=AnsiString(char(MainFrm->password[i]+i+1));

         MainFrm->outfile<<"1"<<Temp.c_str();
         ShowMessage("密码修改成功!");
         MainFrm->outfile.close();
         this->Close();
       }
       else
        { Application->MessageBox("两次密码不一致!","警告!",MB_ICONWARNING);
          Edit2->Text="";
          Edit3->Text="";
          MainFrm->outfile.close();
        }
    }
   else
    Application->MessageBox("旧密码错误!","错误!",MB_ICONERROR);



}
//---------------------------------------------------------------------------

void __fastcall TPasswordSetFrm::Button2Click(TObject *Sender)
{
  this->Close();      
}
//---------------------------------------------------------------------------




void __fastcall TPasswordSetFrm::FormCreate(TObject *Sender)
{
  if(MainFrm->enpassword=='0')
   { Edit1->Text="???";
     Edit1->Enabled=false;
     Label1->Enabled=false;
   }      
}
//---------------------------------------------------------------------------

void __fastcall TPasswordSetFrm::Button3D1Click(TObject *Sender)
{
   Button1Click(Sender);     
}
//---------------------------------------------------------------------------

void __fastcall TPasswordSetFrm::Button3D2Click(TObject *Sender)
{
  Button2Click(Sender);      
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -