跨学游戏网：纯净绿色软件游戏下载网站

电脑软件| 软件合集| 最近更新| 网站地图

当前首页：首页 > 电脑软件 > 编程开发 > MyCode代码生成器

MyCode代码生成器

MyCode代码生成器

类型：编程开发版本：v1.0绿色版更新：2023-10-30 12:17:07大小：555KB系统：WinXP, Win7语言：简体

精品推荐

排行榜

1
DVR18S
DVR18S
旅行交通
2
UBUS
UBUS
旅行交通
3
pr18九天狐
pr18九天狐
壁纸工具
4
百度健康医典
百度健康医典
健康医疗
5
北京市自然人电子税务局扣缴端
北京市自然人电子税务局扣缴端
行业软件

推荐合集

炮火轰鸣，雷电飞机类经典游戏合集 炮火轰鸣，雷电飞机类经典游戏合集
超高难度游戏盘点，挑战极限的玩家快来下载 超高难度游戏盘点，挑战极限的玩家快来下载

MyCode代码生成器，自动生成BCB版数据库操作代码(ADO)，无需手工编写，只需调用即可执行复杂的数据库操作。

呼叫方法

准备工作:

登录到数据库，单击Generate，将DBComm文件夹复制到用户目录，并在cpp文件头中添加以下内容:

#包含& quot。\ DBComm \ DBTables \ myinfooperator . h & quot；

#包含& quot。\ DBComm \ DBTables \ record operator . h & quot；

#包含& quot。\ DBComm \ DBTables \ recordview operator . h & quot；

#包含& quot。\ DBComm \ DBComm.h & quot

点击“项目”菜单，选择“添加到项目”，添加DBComm中的所有cpp文件(包括DBTables下的cpp文件)。

呼叫示例

连接数据库

void _ _ fast call t form 1::form create(to object * Sender)

{

WideString wstrConnStr = & quot；Provider = SQlolEDB.1综合安全= SSPI；Persist安全信息= False初始目录= mytest & quot；

if(DBComm::Instance()。ConnectDB(wstrConnStr))

{

dbgrid 1-& gt；DataSource=DBComm::Instance()。表格& ltRecordViewOperator & gt(DBComm::record view)-& gt；source()；

}

}

[div]

添加新的记录

void _ _ fast call t form 1::speed button 1 click(to object * Sender)

{

[div]

DBComm::Instance()。表格& ltMyInfoOperator & gt(DBComm::MyInfo)-& gt；新建(标签为edit 2-& gt；文本，标签为edit 3-& gt；文字。ToDouble()，& quot管理员& quot，现在())；

}

}

[div]

删除a 记录

void _ _ fast call t form 1::speed button 3 click(to object * Sender)

{

[div]

if(dbgrid 1->；数据源-& gt；数据集-& gt；记录计数)

{

int nID = dbgrid 1-& gt；数据源-& gt；数据集-& gt；字段-& gt；字段[0]-& gt；AsInteger

String str condition = & quot；ID = & quot+String(nID)；

DBComm::Instance()。表格& ltRecordOperator & gt(DBComm::Record)-& gt；删除(str condition)；

}

}

[div]

更新一个记录

[div]

void _ _ fast call t form 1::speed button 2 click(to object * Sender)

{

if(dbgrid 1->；数据源-& gt；数据集-& gt；记录计数)

{

int nID = dbgrid 1-& gt；数据源-& gt；数据集-& gt；字段-& gt；字段[1]-& gt；AsInteger

String strName = labeled edit 2-& gt；文本；

float FM oney = labelededit 3-& gt；文字。ToDouble()；

String str condition = & quot；ID = & quot+String(nID)；

DBComm::Instance()。表格& ltMyInfoOperator & gt(DBComm::MyInfo)-& gt；更新(strName，fMoney，& quot管理员& quot，Now()，str condition)；

}

}

[div][div]

获取数据源

dbgrid 1-& gt；DataSource=DBComm::Instance()。表格& ltRecordViewOperator & gt(DBComm::record view)-& gt；source()；

标签： 数据库类