PB的数据库转换成DELPHI数据库的问题,急。急。急(200分)

K

kuqugun

Unregistered / Unconfirmed
GUEST, unregistred user!
我这里有一个PB数据库文件XXX。DB,我现在想要把这个数据库文件的内容在DELPHI里面显示出来,问题就出现了,这个PB的数据库文件的一个字段的数据类型是LONG BINARY,我在DELPHI里面显示这个数据内容直接是一个乱码,现请教各位大虾我该怎么把这个LONG BINARY的数据内容在DELPHI里面显示出来???
开发环境(PB9,ASA8,WINDOWS2000,DELPHI7).
那个字段放的是文件内容(好象是word文件内容)
需要完整的DELPHI程序段
 
要想显示Word文件的内容,要用TOLEContainer类的控件。
 
kgafly:
1 把文件变成流
FS : TFileStream;
FS := TFileStream.Create(文件名,参数);
// 参数自己看帮助
Freeandnil(FS);
2 把流存入数据库
myblogstram : TStream;
ADOFILEREPORT.Edit;
myblogstram :=
ADOFILEREPORT.CreateBlobStream(ADOFILEREPORT.FieldByName('字段名称'), bmWrite);
myblogstram.CopyFrom(FS, 0);
myblogstram.Free;
ADOFILEREPORT.Post;
 
谢谢你们了,问题已经解决了。
 
顶部