插入图片 问题 大哥帮忙

jsp1988

<>这是我的代码</P>
<> if(OpenPictureDialog1-&gt;Execute())</P>
& H/ U. s% [( E<>   {
   TMemoryStream *pm=new TMemoryStream();
   Image1-&gticture-&gt;LoadFromFile(OpenPictureDialog1-&gt;FileName);
   TJPEGImage *jpg=dynamic_cast&lt;TJPEGImage*&gt;(Image1-&gticture-&gt;Graphic);
   if(jpg!=NULL)
; h# s# D7 P* z9 l" H  R" W    jpg-&gt;SaveToStream(pm);
9 _) Q8 S/ I3 @' Q' S, @* M$ B    else
" N3 `9 X# ^/ R2 d7 c- J. b* Q    Image1-&gticture-&gt;Bitmap-&gt;SaveToStream(pm);
      ClientDataSet1-&gt;CommandText="insert into student1 (name1,name2,pic) values ('1','1',:picture)";</P>
<>      ((TBlobField*)(ClientDataSet1-&gtarams-&gtaramByName("picture")))-&gt;LoadFromStream(pm);
4 N/ v5 b* E% X. e( }        delete pm;
7 q3 K9 q1 T& g% b0 M( C' G        ClientDataSet1-&gt;Execute();
     }</P>
3 Q* m6 x' L% @1 J* F<>在运行期间出错误 </P>
" G- c; k7 R- C6 ^<>rject project1.exe raised exception class
/ E8 Q" P4 f9 |* W5 [6 g7 CEAcessViolation with message ' Acess violation at address 40325fa4 in model
2 U) c& w4 j2 z, X" G' dbrtl60.bpl '  read of address 94636b84</P>
<>请问大哥们改如何的改正</P>
<>谢谢！！</P>

ilikenba

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