说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

在Delphi动态生成定义数据库

HTML文档下载 WORD文档下载 PDF文档下载
在Delphi动态生成定义数据库

在开发通用工资管理等应用数据库管理系统时

预先定义好数据库的结构

就不能保证应用系统的通用性。不同的单位需要不同的数据库

为了减少程序的开发量

并保证程序的通用性

就必须在程序运行中根据实际情况定义所需要的数据库。

在Delphi开发环境中

定义数据库通常需要运行Data Base Desktop。在程序运行中使用组件TTable也可以根据需要定义和修改数据库的结构。

定义标准数据库

定义数据库时数据库文件信息和数据库结构信息是必需的

如数据库文件的完整路径

数据库类型

数据库的字段名、类型、长度等。在Delphi程序中可以定义三种标准类型的数据库

DBASE数据库、Paradox数据库、ASCII数据库。

下面给出的过程已在WIN95Delphi3.0C/S下运行通

过。

procedure ZldcreateTable;

var

zldT:TTable;

begin

zldT:=TTable.Create(Self);

with zldT do

begin

DatabaseName:='DBDEMOS';{预定义的别名数据库工作区名}

TableName:='ZLDDBASE';{将定义的数据库名}

TableType:=ttDbase;{数据库类型

可为ttParadox、ttASCII、ttDbase}

with FieldDefs do{数据库结构信息}

begin

Clear;

Add('ZLS'

ftInteger

0

false);

Add('ZLD'

ftBoolean

0

false);

Add('ZEZ'

ftString

10

false);

Add('XL'

ftDate

0

false);

{....} //------Add Other Fields Here

end;

with IndexDefs do{索引文件信息}

begin

Clear;

Add('Primary'

'ZEZ'

[ixPrimary

ixUnique]);

{....} ////------Add Other Indexes Here

end;

CreateTable; //---- dynamically Create Table;

end;

end;

通过以上方法建立数据库

如果已经存在同名数据库

将被覆盖

数据将全部丢失。

当修改一个数据库的结构时

也可以利用TTable的方法CreateTable。先打开欲修改的数据库

取得该数据库的结构信息

再对其修改

然后用修改后的结构信息重新建立一个新数据库

再将原数据库中相同的列写入新数据库中

删除原数据库

改新数据库名为原数据库名即可。

初创公司Ionic Security:云安全必须与时俱进 谷歌董事长:一年后消费者才能用上Goolge Glass Windows 8.1重新推出的“开始按钮”毫无意义 手眼并用 代码泄露三种Google Glass手势操作 Google新论文 CPI²:基于Linux的世界级跨数据中心服务器CPU监控 20款非常实用的Web工具和资源列表 数据库界大事件 随机写性能巨好的TokuDB开源了 CMDN Club 26期:数字渠道营销主题沙龙 暴强:用iOS设备控制的HTML5“小蜜蜂”游戏 Leap Motion:500元体感,精确到0.01毫米 大事件:三大运营商将发布融合计费SDK 再培养一个扎克伯克:六款适合儿童上手编程的App 首届中国软件工程标准高峰论坛:软件开发的新机遇与挑战 Verizon研究显示:中国成为2012年度网络间谍攻击的主要来源 Clang宣布全面支持C++11标准 北大陈钟:SEMAT—中国软件工程发展的新机遇 超华尔街预期:苹果第二财季营收为436亿美元 跨平台游戏引擎Spaceport已被Facebook收购 文科生开发GPU数据库 性能超传统数据库70倍 开发者赚了90亿:从苹果Q2财报,看iOS生态 备受开发者青睐的13款热门开源项目 Netflix赌赢《纸牌屋》背后的秘密武器:大数据分析 为什么:Google Glass只能运行Web应用? 对话Rackspace高级副总裁Jim Curry:我们没有"辜负"营销炒作 7个大数据流言——避免错误的Hadoop和云分析决策 Facebook vs. Google:撇开搜索,数据中心产业上的又一竞技 苹果将于6月10日召开WWDC 新版OS X和iOS或将面世 传Amazon今年秋季发布电视机顶盒设备 够快:不会3种以上语言的程序员不是好程序员 Cloud Foundry、Greenplum获通用电气1亿美元注资 微软推超强Android应用Switch to Windows Phone 在线等候 怎么将数据库中的字段项动态的添加到COMBOX里面去。(我用的是DB2数据库) sql关于多个数据库的问题 散分了! 我也散点分吧 有些话不吐不快!看某不知来历的版主下台后发贴有感 不知道是怎么回事,难道是显示器坏了? 启动windowns2000报错"no language support detected",请问怎么解决? WIN ME下怎么调试 ASP? oracle 存储过程代码格式优化 大家看过《ASP.NET完全手册》这本书吗?为什么书中提供的与书想配的站点http://www.prosetech.com/CompleteReference/不可访问呢? 紧急求救:如何根据数据库中的值以红色字体显示datagrid中的满足条件特定列特定行? 能不能实现用NOTES databse打开一个website(公司内部的),同时这个database自动关闭?? 用pear的进来报个名,以后互相学习~ VB.NET的两个简单问题??? not enough free disk space on /tmp,这个问题如何解决,(100分) 急寻:中缀和后缀表达式互转的源代码。 请问这个页面如何实现的..... 简单问题,在线等待中... 百分求购事务处理!! 用ATL写了一个com组件,在客户端怎么调用它呢? 请问如何取得USB摄像头和普通麦克的数据,怎样将已得到的视频音频数据在终端上播放 如何让WAS和Tomcat一样,运行JSP/SERVLET的时候出现错误进行提示? 用JDBC连接SQL Server 2000数据库问题?在线等待... 弹出式菜单的问题 各位大侠,寻求帮助,急!急! c语言类中的私有和公有变量在汇编中怎么表示? 关于EJB测试的问题 谁能给个错误处理的例子 比如 SQLSERVER 数据库关闭时 返回 “数据库关闭“ 的信息 部分匹配的问题 英文版XP中文显示问题 oracle,用PreparedStatement更新数据库,date型字段精确到分,应该如何操作? 数据导入的问题 有正义感的高手进来帮忙,干掉我设计的网站吧!在此不盛感激,同时也代表天下IT民工谢谢。 开始学PHP的菜鸟说:我现在用一个支持PHP的空间。比如XXX.PHP就可以用。我想用数据库。怎么连接呢?我可以把数据库放到自己的目录下用数 送分 我用的是:无惧上传类 Version V1.2 ,但是,程序执行后无出错提示,担找不到上传的文件,什么原因,那位朋友邦忙解决一下. 使用“POPTEN新闻管理系统”为什么不能上传图片呀? 小弟想学习EJB,不知道那本书较好? 测试过程 请问: 如果将数据分页里的复选框全选,并将每个复选框得到的ID插入另一张表。?? 关于Adodb+DataGrid的配合使用问题,高手请进! ★ ★我想在资源管理器窗口上 再加上一个Toolbar,(我看到过有些软件做到了,而且添加的Toolbar中还有启动程序的按钮),请问怎样可以做到 请教:“纳入基线” vs.net的水晶报表连接oracle,但找不到表,什么问题?很急啊!!! 关于float,double类型的数据四舍五入的讨论! 有无软件或OS可实现一台强大的电脑带多套外设?(N多键盘、鼠标) 请问如何正确配置和使用第三方开发包阿? 触发一个已封装好的程序 根据textbox内容查询数据库怎么写? 内存访问错误,参与者有分! 已知一个大正方形边长6厘米,一个小正方形边长4厘米.求出阴影部分的面积,下面看图.http://wenwen.soso.com/z/q349154202.htm?ri=4000&rq=344019807&uid=0&pid=w.xg.yjj&ch=w.xg.xgseo 就是这个网页的里面那2个正方形 设函数y=arctan1/x,求y'' 与朱元思书中流露出作者怎样的情感和志趣 夏昼偶作这首诗中流露出作者什么样的心情? 《暮春即事》作者在诗中流露出了一种什麽样的情感? 《野望》中作者在恬静的景色描写中流露出孤独抑郁的心情的一句是 我哥说 如来是什么意思啊 3(2)题, 初一人教版4.3. 寂寞和孤单是一个意思吗?分别从“词义”来讲和从“情感”来讲. 以下单词的过去分词know run are put drink say have buy teach see tell sit leach get take find read go meet swim come cut make stand drive还有过去式 伊朗外长与联合国-阿盟特别代表呼吁政孟加拉国总理呼吁反对党取消全国大罢工奥地利总理国庆讲话告诫不忘纳粹历史巴勒斯坦呼吁共同抵制以扩建犹太人定居印度东部洪灾死亡人数升至45人李娜打入总决赛排名进Top3 创亚洲河南济源一路段7公里6个“收费站”专刘云山:教育实践活动整改工作要准、狠白岩松惋惜恒大未能锁定胜局:首尔死刑亚冠决赛首回合恒大2-2首尔 穆里奇中国科学家成功研发人感染H7N9禽流金科地产入滇 拿地官渡区小板桥QDII今年中考成绩飘红 景顺长城大赛果和预告百集龙四周年庆典 买建材家具送“汽车2014数字电视大会 TCL获三大奖扬子晚报球迷圈名人看球吧今晚隆重登场彝良县领导手机号公开 全天开机为民解雨污分流工棚强占公交场站一年《花样年华2》今晚开启寻宝模式古琴丝弦制作唯一传承人是位七旬老人后市供盘量减少 购房且买且珍惜
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘