DELPHI记录集结构以流的方式文字+图片写入自定义库
DELPHI记录集结构以流的方式文字+图片写入自定义库
文件名:Libdat.dat,这个数据库是自定义的不是标准的
ACCESS之类的,文件内容如下:
//--------------------------------------------------------
Delphi文字和图片以流的方式写入文件中
记录集结构
结构方式写入文件的,但是文件的结构如下:
姓名 年龄 照片
张三 25 张三的照片
李四 20
赵五 22 赵五的照片
意思是有的记录有照片,有的记录没有照片
我原记录集结构是:
type
TRec=record {定义一个记录}
name:string[10]; //姓名
xb:string[2]; //性别
age:integer; //年龄
yw:integer; //语文
xs:integer; //数学
zz:integer; //政治
end;
//==============================================
这个结构的基本操作:添加\删除\修改\保存\第一条记录\上一条\下一条
最后一条\插入等功能都完成了
//----------------------------------------------
操作方式:非文件流格式,文件格式都测试OK...............
//==============================================
我现在的问题是加上:
zpsize:integer
相关问答:
已知Python 中:
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试
在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢?
找到个方法
......
由于客戶端有的文件經常更新(遠程的,不是局域網),
所以想寫個自動更新的 程序。
看網上的 方法資料,知道些方法,但不知道具體怎么寫。
......
procedure RunFunction;
type
TFunc = function(A: Integer): Integer;stdcall; //这里根据DLL里面函数的声明修改
var
......
急用。联系QQ:8775262,谢谢。
需要进行DllImport的地方直接写DLLImport.方法名。
如:DLLImport.GlobalAddAtom(……);
文件:UShare.pas
Delphi(Pascal) code:
unit UShare;
interface
uses Windows, Me ......