password.~cpp

来自「一个不错的销售系统」· ~CPP 代码 · 共 33 行

//---------------------------------------------------------------------------
//      Name:           Password.cpp
//      Author:         Jrays
//      Date:           1999.8.7
//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "Password.h"
//--------------------------------------------------------------------- 
#pragma resource "*.dfm"
TfrmPassword *frmPassword;
//---------------------------------------------------------------------
__fastcall TfrmPassword::TfrmPassword(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------

void __fastcall TfrmPassword::FormCreate(TObject *Sender)
{
        Caption = Application->Title;        
}
//---------------------------------------------------------------------------

void __fastcall TfrmPassword::FormActivate(TObject *Sender)
{
        edtPassword->Text = "";
        edtPassword->SetFocus();        
}
//---------------------------------------------------------------------------