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的汉字呢？
找到个方法
......
接收到的文本内容是ucs2编码格式，请问怎样转换成中文
按我的理解，UCS-2是字符集，具体的编码有UTF-8，UTF-16 (LE/BE)等。
如果你用Delphi 2009及以上版本，可以看看TEncoding类。
btw. 你说的转换成中文是啥意� ......
procedure RunFunction;
type
TFunc = function(A: Integer): Integer;stdcall; //这里根据DLL里面函数的声明修改
var
......
昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下：
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......
返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......
