数学建模社区-数学中国

标题: 插入图片 问题 大哥帮忙 [打印本页]

作者: jsp1988    时间: 2004-7-7 08:31
标题: 插入图片 问题 大哥帮忙
<>这是我的代码</P>
7 P* Q" _* o6 o& L: f+ k; ]9 U: A<> if(OpenPictureDialog1-&gt;Execute())</P>+ b  R! J* @& Y0 _3 U
<>   {! C" b% [: `8 ~- Y# r
   TMemoryStream *pm=new TMemoryStream();- [# l. A% h) b  ]3 t) W: z
   Image1-&gticture-&gt;LoadFromFile(OpenPictureDialog1-&gt;FileName);
6 {: K4 Z0 o% p. N" r   TJPEGImage *jpg=dynamic_cast&lt;TJPEGImage*&gt;(Image1-&gticture-&gt;Graphic);) {" O0 i% f: ^& X2 ]; P
   if(jpg!=NULL)
5 w2 _+ X5 Q, H3 R    jpg-&gt;SaveToStream(pm);$ v- C9 `* W2 e% R% I. \
    else
4 z3 L2 H3 W& a7 s7 v5 G3 x    Image1-&gticture-&gt;Bitmap-&gt;SaveToStream(pm);
7 t5 J0 v9 }/ i4 L* E- G      ClientDataSet1-&gt;CommandText="insert into student1 (name1,name2,pic) values ('1','1',:picture)";</P>: g: @( ~9 w* @: o
<>      ((TBlobField*)(ClientDataSet1-&gtarams-&gtaramByName("picture")))-&gt;LoadFromStream(pm);+ [3 F5 n5 ~4 Z" A9 G& [* ~
        delete pm;% Q7 [+ I1 D$ E6 ^/ }) c
        ClientDataSet1-&gt;Execute();8 x0 R" l# h$ e1 L. f' j% z/ ^; G
     }</P>
  `6 |, D$ p9 i; I6 J% L3 M) o<>在运行期间出错误 </P>
8 n/ H9 }" D( y/ U/ z7 q' q<>rject project1.exe raised exception class
5 Y3 Q! J% c0 n4 \% zEAcessViolation with message ' Acess violation at address 40325fa4 in model
% R6 j$ t. C7 P# b5 h8 L' dbrtl60.bpl '  read of address 94636b84</P>
1 ?  V2 e; d( [( B: e9 A' z4 w2 A<>请问大哥们改如何的改正</P>; W, G/ u) I2 ^0 v  F; @
<>谢谢!!</P>
作者: ilikenba    时间: 2004-7-7 11:00
<>((TBlobField*)(ClientDataSet1-&gtarams-&gtaramByName("picture")))-&gt;LoadFromStream(pm);这句的问题!</P><>TBlobField类是一个字段类!不能将参数转成字段!关于类的说明参见本版的帖子!</P>




欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5