插入图片 问题 大哥帮忙

jsp1988

<>这是我的代码</P>
6 R( [' g4 s0 \6 e! L* k" r<> if(OpenPictureDialog1-&gt;Execute())</P>
& G- H+ q9 H% {5 c; _* o<>   {
) v+ f; W9 n/ F   TMemoryStream *pm=new TMemoryStream();
' \% T- `8 k: M$ ^& d   Image1-&gticture-&gt;LoadFromFile(OpenPictureDialog1-&gt;FileName);
   TJPEGImage *jpg=dynamic_cast&lt;TJPEGImage*&gt;(Image1-&gticture-&gt;Graphic);
1 N$ e, s+ f6 K3 l# T   if(jpg!=NULL)
    jpg-&gt;SaveToStream(pm);
, d6 w- B8 l' J0 O% i6 p4 W; Q1 r. m    else
9 x4 @# h2 Z5 V: U    Image1-&gticture-&gt;Bitmap-&gt;SaveToStream(pm);
      ClientDataSet1-&gt;CommandText="insert into student1 (name1,name2,pic) values ('1','1',:picture)";</P>
/ d& W3 P1 J1 I6 A8 a$ E( c& v<>      ((TBlobField*)(ClientDataSet1-&gtarams-&gtaramByName("picture")))-&gt;LoadFromStream(pm);
1 G5 b  a6 w# X- q        delete pm;
        ClientDataSet1-&gt;Execute();
8 G  u' B, H9 s$ V( S     }</P>
. ?9 E: q/ t' ~$ Z7 @. m$ K  \<>在运行期间出错误 </P>
! l6 G* E- C( A. y: p* P<>rject project1.exe raised exception class
EAcessViolation with message ' Acess violation at address 40325fa4 in model
# D# B. r1 i+ h2 }' dbrtl60.bpl '  read of address 94636b84</P>
<>请问大哥们改如何的改正</P>
<>谢谢！！</P>

ilikenba

<>((TBlobField*)(ClientDataSet1-&gtarams-&gtaramByName("picture")))-&gt;LoadFromStream(pm);这句的问题！</P><>TBlobField类是一个字段类！不能将参数转成字段！关于类的说明参见本版的帖子！</P>