jsp1988 发表于 2004-7-7 08:31

插入图片 问题 大哥帮忙

<P>这是我的代码</P>
<P> if(OpenPictureDialog1-&gt;Execute())</P>
<P>   {
   TMemoryStream *pm=new TMemoryStream();
   Image1-&gt;Picture-&gt;LoadFromFile(OpenPictureDialog1-&gt;FileName);
   TJPEGImage *jpg=dynamic_cast&lt;TJPEGImage*&gt;(Image1-&gt;Picture-&gt;Graphic);
   if(jpg!=NULL)
    jpg-&gt;SaveToStream(pm);
    else
    Image1-&gt;Picture-&gt;Bitmap-&gt;SaveToStream(pm);
      ClientDataSet1-&gt;CommandText="insert into student1 (name1,name2,pic) values ('1','1',:picture)";</P>
<P>      ((TBlobField*)(ClientDataSet1-&gt;Params-&gt;ParamByName("picture")))-&gt;LoadFromStream(pm);
        delete pm;
        ClientDataSet1-&gt;Execute();
     }</P>
<P>在运行期间出错误 </P>
<P>Prject project1.exe raised exception class
EAcessViolation with message ' Acess violation at address 40325fa4 in model
' dbrtl60.bpl '  read of address 94636b84</P>
<P>请问大哥们改如何的改正</P>
<P>谢谢！！</P>

ilikenba 发表于 2004-7-7 11:00

<P>((TBlobField*)(ClientDataSet1-&gt;Params-&gt;ParamByName("picture")))-&gt;LoadFromStream(pm);这句的问题！</P><P>TBlobField类是一个字段类！不能将参数转成字段！关于类的说明参见本版的帖子！</P>
页: [1]
查看完整版本: 插入图片 问题 大哥帮忙