unit3.cpp

来自「电费管理程序」· C++ 代码 · 共 52 行

//---------------------------------------------------------------------
#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();

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