welcomeu.cpp

这是个16路采集器的上位机源码。该套程序是由C++builder开发的

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

#include <vcl.h>
#pragma hdrstop

#include "WelcomeU.h"
#include "MainU.h"
#include "PasswordU.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TWelcomeFrm *WelcomeFrm;
//---------------------------------------------------------------------------
__fastcall TWelcomeFrm::TWelcomeFrm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TWelcomeFrm::Timer1Timer(TObject *Sender)
{
  Timer1->Enabled=false;
  if(MainFrm->enpassword=='1')
   { Application->CreateForm(__classid(TPasswordFrm), &PasswordFrm);
     PasswordFrm->Show();
   }
  else
    MainFrm->Show();
  WelcomeFrm->Hide();

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