关于大对象取图片 本帖最后由 caipuhappy 于 2011-01-24 22:28:49 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 大概就是這樣子:varBu:Word;ms:TMemoryStream;s:string;ms:=TMemoryStream.Create;TBlobField(ADODataSet1.FieldByName('PIC')).SaveToStream(ms);ms.Position:=0;ms.ReadBuffer(Bu,2);case Bu of $4D42: s:='.Bmp'; $D8FF: s:='.JPEG'; ...其它end; jpg和bmp都有文件头可以识别其格式,你只需要加载字段流,判断头部信息即可具体的文件格式说明,可以看下面连接http://www.moon-soft.com/program/format/ 记得用GDI+ 直接就可以加载了吧,楼主可以试试GDI+ 试了下,报错了,在readbuffer这句,而且说是 stream read error 怎么回事呢? readbuffer没问题了,可是还是报错,JPEG error #53,这又是怎么回事 求救:winsocket有关的~~~ delphi中怎样解决字符串数据右截位的问题???急----急--- 请问如何控制一组控件? 短信平台问题 为什么没有出口阿????????? 请问如何解决多键同时按下冲突? 怎样在自己的程序里加入NetMeeting共享白板的功能?急!! 求救!!! 高分求一弱智问题,如何求1,2,3,4,...n的最小公倍数 关于DELPHI导出到EXCEL的问题请教 我想Delphi调用一个BCB写的DLL 请问如何将2个表的数据合并到一个表中
Bu:Word;
ms:TMemoryStream;
s:string;ms:=TMemoryStream.Create;
TBlobField(ADODataSet1.FieldByName('PIC')).SaveToStream(ms);
ms.Position:=0;
ms.ReadBuffer(Bu,2);case Bu of
$4D42:
s:='.Bmp';
$D8FF:
s:='.JPEG';
...其它end;
具体的文件格式说明,可以看下面连接
http://www.moon-soft.com/program/format/
记得用GDI+ 直接就可以加载了吧,楼主可以试试GDI+
试了下,报错了,在readbuffer这句,而且说是 stream read error 怎么回事呢?