-
大小: 1.74MB文件類型: .rar金幣: 2下載: 0 次發布日期: 2023-11-10
- 語言: C/C++
- 標簽: C++Builder??
資源簡介
學生信息管理 學生成績管理 課程信息管理 Accesss數據庫 實現信息添加,刪除,修改及查詢功能。

代碼片段和文件信息
//---------------------------------------------------------------------------
#include?
#pragma?hdrstop
#include?“course.h“
#include?“main.h“
//---------------------------------------------------------------------------
#pragma?package(smart_init)
#pragma?resource?“*.dfm“
TFm_course?*Fm_course;
//---------------------------------------------------------------------------
__fastcall?TFm_course::TFm_course(TComponent*?Owner)
????????:?TForm(Owner)
{
}
//---------------------------------------------------------------------------
void?__fastcall?TFm_course::DBEditTrue()
{
??DBEdit1->Enabled=true;
??DBEdit2->Enabled=true;
??DBEdit3->Enabled=true;
}
//------------------------------------------------------------
void?__fastcall?TFm_course::DBEditFalse()
{
??DBEdit1->Enabled=false;
??DBEdit2->Enabled=false;
??DBEdit3->Enabled=false;
}
//------------------------------------------------------------
void?__fastcall?TFm_course::autoinc()??//編號自動+1
{
??try
??{
????courseQuery->Post();
??}
??catch(...)
??{
????Temp=DBEdit1->Text;
????Temp=IntToStr(StrToInt(Temp)+10001);
????VBh=Temp.SubString(24);
????DBEdit1->Field->Text=VBh;
????autoinc();
??}
}
//------------------------------------------------------------
void?__fastcall?TFm_course::FormShow(Tobject?*Sender)
{
??AnsiString?S;
??//ShortDateFormat=“yyyy-mm-dd“;
??S=“select??*??from?course“;
??courseQuery->Close();
??courseQuery->SQL->Clear();
??courseQuery->SQL->Add(S);
??courseQuery->Open();
??bt_new->Enabled=true;
??bt_modify->Enabled=true;
??bt_delete->Enabled=true;
??bt_search->Enabled=true;
??bt_save->Enabled=false;
??bt_cancel->Enabled=false;
??DBEditFalse();
??if(courseQuery->IsEmpty())
??{
????bt_modify->Enabled=false;
????bt_delete->Enabled=false;
??}
}
//---------------------------------------------------------------------------
void?__fastcall?TFm_course::bt_newClick(Tobject?*Sender)
{
???AnsiString?S;
??DBNavigator1->Enabled=false;
??bt_search->Enabled=false;
??bt_new->Enabled=false;
??bt_save->Enabled=true;
??bt_modify->Enabled=false;
??bt_delete->Enabled=false;
??bt_cancel->Enabled=true;
??DBEditTrue();
??S=“select?Max(cno)?from?course“;
??Query->Close();
??Query->SQL->Clear();
??Query->SQL->Add(S);
??Query->Open();
??Temp=Query->FieldByName(“Expr1000“)->AsString;
??if(Temp!=““)
??{
????Temp=IntToStr(StrToInt(Temp)+10001);
????VBh=Temp.SubString(24);
??}
??else
????VBh=“0001“;
??courseQuery->Append();
??DBEdit1->Field->Text=VBh;
??DBEdit2->SetFocus();
}
//---------------------------------------------------------------------------
void?__fastcall?TFm_course::bt_modifyClick(Tobject?*Sender)
{
??DBNavigator1->Enabled=false;
??bt_search->Enabled=false;
??bt_new->Enabled=false;
??bt_save->Enabled=true;
??bt_modify->Enabled=false;
??bt_delete->Enabled=false;
??bt_cancel->Enabled=true;
??DBEditTrue();
??courseQuery->Edit();
??DBEdit2->SetFocus();
}
//----------------------
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件???????6842??2009-12-16?22:17??0613043006\course.cpp
?????文件???????4381??2009-12-16?22:19??0613043006\course.dfm
?????文件???????2305??2009-12-16?22:17??0613043006\course.h
?????文件?????517663??2009-12-16?22:23??0613043006\course.obj
?????文件???????6845??2009-12-16?22:17??0613043006\course.~cpp
?????文件???????4381??2009-12-16?22:17??0613043006\course.~dfm
?????文件???????2305??2009-12-16?22:17??0613043006\course.~h
?????文件????????579??2009-12-16?20:03??0613043006\courserep.cpp
?????文件???????7789??2009-12-16?20:10??0613043006\courserep.dfm
?????文件???????1197??2009-12-16?20:11??0613043006\courserep.h
?????文件?????312490??2009-12-16?22:23??0613043006\courserep.obj
?????文件????????526??2009-12-16?19:59??0613043006\courserep.~cpp
?????文件????????328??2009-12-16?19:59??0613043006\courserep.~dfm
?????文件????????757??2009-12-16?19:59??0613043006\courserep.~h
?????文件???????2714??2009-12-16?22:19??0613043006\courseseek.cpp
?????文件???????3002??2009-12-16?22:19??0613043006\courseseek.dfm
?????文件???????1615??2009-12-16?22:19??0613043006\courseseek.h
?????文件?????566995??2009-12-16?22:23??0613043006\courseseek.obj
?????文件???????2714??2009-12-16?20:11??0613043006\courseseek.~cpp
?????文件???????3002??2009-12-16?21:57??0613043006\courseseek.~dfm
?????文件???????1615??2009-12-16?20:10??0613043006\courseseek.~h
?????文件???????5200??2009-12-16?20:11??0613043006\Emplovee.bpr
?????文件???????2287??2009-12-16?20:01??0613043006\Emplovee.cpp
?????文件?????233984??2009-12-17?10:45??0613043006\Emplovee.exe
?????文件??????17259??2009-12-16?20:11??0613043006\Emplovee.obj
?????文件????????876??2003-01-13?22:59??0613043006\Emplovee.res
?????文件????2359296??2009-12-17?10:59??0613043006\Emplovee.tds
?????文件???????5016??2009-12-16?19:59??0613043006\Emplovee.~bpr
?????文件???????2162??2009-12-16?19:38??0613043006\Emplovee.~cpp
?????文件???????8307??2009-12-16?21:57??0613043006\employee.cpp
............此處省略75個文件信息
評論
共有 條評論