怎么写入access的ole对象
解决方案 »
- 关于TreeView控件的stateimages属性关联上TImageList控件后,TImageList中图标不能超过15个的问题,否则在TreeView中就显示不了
- 在Delphi中,怎样可从枚举Excel2000的sheet1,sheet2,....
- windows98系统编程
- TNND,这算不算是软件业的悲哀。
- 如何从Edit控件创建一个新控件........
- 逻辑型的‘性别’字段,如何在DBGrid显示为‘男’或‘女’。(MDB数据库)
- 找不到function定义的函数
- 很菜的问题,但是分数很高:怎么读写一个文本文件?
- 那位朋友使用过华琦库管精灵这个软件,请留下qq号码和email,交流经验,送分/
- 又一个菜问题!!
- 如何通过SQL语句获得access中表字段的名称
- 系统热键调用隐藏窗体
pdata : pchar;
Mdata : oleVariant;
begin
.......
with TBlobStream(CreateBlobStream(FieldByName('ole字段'),bmWrite)) do
begin
pData:=VarArrayLock(MData);
try
write(pData^,VarArrayHighBound(MData,1)-VarArrayLowBound(MData,1)+1);
finally
VarArrayUnLock(MData);
end;
free;
end;
//最后post
end;