unit3.cpp

电费管理程序 VC源码-系统控制 这个源码是一个系统控制的电费管理系统 功能很强大

//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "Unit3.h"

#include "mainpage.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
TPagesDlg *PagesDlg;
//---------------------------------------------------------------------
__fastcall TPagesDlg::TPagesDlg(TComponent* AOwner)
	: TForm(AOwner)
{



     DBEdit5->ReadOnly=(!MainForm->superuser);


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



void __fastcall TPagesDlg::FormShow(TObject *Sender)
{
    DModule->Table2->Active=true;
    DModule->Table3->Active=true;
}
//---------------------------------------------------------------------------

void __fastcall TPagesDlg::FormClose(TObject *Sender, TCloseAction &Action)
{
    DModule->Table2->Active=false;
    DModule->Table3->Active=false;

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

void __fastcall TPagesDlg::OKBtnClick(TObject *Sender)
{
    DModule->Table2->Edit();
    DModule->Table3->Edit();
    DModule->Table2->Post();
    DModule->Table3->Post();

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