如何进行简单的在access中取到类型为ole的字段？显示在界面上？ ( 积分: 100 )

I

irabbit_cn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-10

• #1

如何进行简单的在access中取到类型为ole的字段？显示在界面上？又如何保存到access中？

 

I

irabbit_cn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-10

• #2

如何进行简单的在access中取到类型为ole的字段？显示在界面上？又如何保存到access中？

 

B

bbscom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-10

• #3

用 ADOQuery1.FieldByName('').DataType　取類型
然後與下面的值相等就是這個。
TFieldType = (ftUnknown, ftString, ftSmallint, ftInteger, ftWord,
ftBoolean, ftFloat, ftCurrency, ftBCD, ftDate, ftTime, ftDateTime,
ftBytes, ftVarBytes, ftAutoInc, ftBlob, ftMemo, ftGraphic, ftFmtMemo,
ftParadoxOle, ftDBaseOle, ftTypedBinary, ftCursor, ftFixedChar, ftWideString,
ftLargeint, ftADT, ftArray, ftReference, ftDataSet, ftOraBlob, ftOraClob,
ftVariant, ftInterface, ftIDispatch, ftGuid, ftTimeStamp, ftFMTBcd);

 

J

jiangzhang3942

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-10

• #4

帮顶，学到了不少的东西，谢谢了
强烈支持

 

J

jiangzhang3942

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-10

• #5

帮你顶，但是我想知道当access数据库的字段设置为ole字段时怎么能取到ole里面的内容呢
如果哪位高手能回答，我愿意将所有的分都给他

 

温

温柔剑客

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-10

• #6

如果是图片文件我就有办法，如果是word之类的文档或者视频声音就要用另外一种办法调用了
bitmpbt:=TBitMap.Create;
bitmpbt.Width:=imgbq.Picture.Bitmap.Width;
bitmpbt.Height:=imgbq.Picture.Height;
bitmpbt.Assign(imgbq.Picture.Bitmap);

 

I

irabbit_cn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-11

• #7

我是在数据库里有图片的字段内容，要在delphi中的窗体里显示出来，具体怎么做？

 

H

huanghq123

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-11

• #8

在界面上放一个image来显示图片
try
bmp := Tbitmap.Create;
bmp.Assign(ADOQuery1.Fieldbyname('PHOTO'));
Image1.Picture.Bitmap:=bmp;
finally
bmp.Free;
end;

 

I

irabbit_cn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-13

• #9

to huanghq123
按照你的方法，出现提示‘bitmap is not valid’,还是没有显示出图像
来。麻烦各位在给个方法吧！

 

I

irabbit_cn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-28

• #10

最后的问题为什么没有人答呢?[][]

 

W

wei0916

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-28

• #11

最后的问题应该是你读入到数据库里的是JGP类型的图片,而不是BMP的图片,你在保存时就应该将JGP转为BMP入库.

 

Y

yeskert1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-28

• #12

var strm:TStream;
begin
strm:=dataset1.CreateBlobStream(dataset1.fieldbyName('picture'),bmRead);
Image1.Picture.loadfromstream(strm);
end;
就这样！