插入图片 问题 大哥帮忙

jsp1988

<>这是我的代码</P>
& Q! Y9 ?; m1 s' r. W% ?2 M3 {3 D0 ]5 N<> if(OpenPictureDialog1-&gt;Execute())</P>
<>   {
   TMemoryStream *pm=new TMemoryStream();
- e' ]+ z3 |; Q- c% s   Image1-&gticture-&gt;LoadFromFile(OpenPictureDialog1-&gt;FileName);
   TJPEGImage *jpg=dynamic_cast&lt;TJPEGImage*&gt;(Image1-&gticture-&gt;Graphic);
2 H) N, `' z1 o" C# g   if(jpg!=NULL)
    jpg-&gt;SaveToStream(pm);
    else
    Image1-&gticture-&gt;Bitmap-&gt;SaveToStream(pm);
/ I: f4 ^# ^) F# w9 N. Z3 r      ClientDataSet1-&gt;CommandText="insert into student1 (name1,name2,pic) values ('1','1',:picture)";</P>
+ f$ T( d* u  y4 c<>      ((TBlobField*)(ClientDataSet1-&gtarams-&gtaramByName("picture")))-&gt;LoadFromStream(pm);
        delete pm;
        ClientDataSet1-&gt;Execute();
. O7 m( G% N- E& ~4 r     }</P>
7 r' e4 i  A+ k  |* T* q<>在运行期间出错误 </P>
* S/ D$ n0 a9 k/ t5 r( U<>rject project1.exe raised exception class
& G! U5 y& P- \, {4 ?EAcessViolation with message ' Acess violation at address 40325fa4 in model
' dbrtl60.bpl '  read of address 94636b84</P>
# }; `* V% r' N1 \! e. U1 @/ C9 a+ J6 ?<>请问大哥们改如何的改正</P>
<>谢谢！！</P>

ilikenba

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