各位高手,
在平常的实现中,只能用一个二进制文件来维护一个数据表的的操作,那么,
能否用一个二进制文件来存储维护2张数据库(拥有不同字段)数据表功能的内容,能否实现?
谢谢!
在平常的实现中,只能用一个二进制文件来维护一个数据表的的操作,那么,
能否用一个二进制文件来存储维护2张数据库(拥有不同字段)数据表功能的内容,能否实现?
谢谢!
解决方案 »
- 用什么报表可以做出这个效果?救命啊!!!
- 100分求翻译一段java代码,翻译成delphi可以用的
- 帮忙:使用TMemoryStream类ReadBuffer时出错?
- TDBGridEh的dghIncSearch、FrozenCols属性是怎么用的?自动断行功能是怎么实现的?
- 到底这样操作无模式类型的form?
- 关于排列组合的问题
- 关于Image的问题再次求教
- 很菜的问题哦!DELPHI中16进制如何表示,16进制和10进制之间转换函数是什么??
- MIDAS 程序 CLIENT 到 SERVER 的连接为什莫总是拒绝访问?
- 关于多线程的问题?(有一点难度)
- 换汤不换药的 Turbo Delphi。
- 包安装DevExpress--ExpressLayoutControl的问题?
可以参考absolute DB,网上有源代码。
代码太大的话mail到小弟,在此先谢了!
type
TXxxRecord = record
filed1:byte;
filed2:longint;
.......
ModuleID:Integer; //0-文件1的模块数据;1-文件2的模块数据;
end;
......
var
MyRecord: TXxxRecord;
MyFile: file of TXxxRecord;
begin
//打开数据文件
System.Assign(MyFile, 'XXXX.bin');
System.Rewrite(MyFile);
try
//在位置0处写入1个纪录
MyRecord.filed1 := 0;
MyRecord.filed2 := 100;
.......
MyRecord.ModuleID := 1;
System.Write(DataFile, MyRecord);
.......
//由位置0读取1个纪录
System.Seek(DataFile, 0);
System.Read(DataFile, MyRecord);
.......
finally
System.Close(DataFile);
end;
end;