数学建模社区-数学中国

标题: 插入图片 问题 大哥帮忙 [打印本页]
作者: jsp1988    时间: 2004-7-7 08:31
标题: 插入图片 问题 大哥帮忙
<>这是我的代码</P>0 c# v3 `0 g, P. p( c% q( E! I
<> if(OpenPictureDialog1-&gt;Execute())</P>
& e$ B- O: c+ U9 ?2 s+ }<>   {5 b! Y% @# U4 X* I% {
   TMemoryStream *pm=new TMemoryStream();2 |& e" J! [- f6 H; L  n3 l, Y
   Image1-&gticture-&gt;LoadFromFile(OpenPictureDialog1-&gt;FileName);: j* o! G2 z: S% T* a4 B3 W7 m
   TJPEGImage *jpg=dynamic_cast&lt;TJPEGImage*&gt;(Image1-&gticture-&gt;Graphic);! t. l8 i5 r3 V9 n7 F; ]
   if(jpg!=NULL)
0 E) J. p$ u; A7 q- f2 j% u    jpg-&gt;SaveToStream(pm);  F9 d9 R! E9 b# _
    else
# R$ q2 B2 g8 X# h% ], N$ t    Image1-&gticture-&gt;Bitmap-&gt;SaveToStream(pm);/ q, O% ~$ S' I2 i
      ClientDataSet1-&gt;CommandText="insert into student1 (name1,name2,pic) values ('1','1',:picture)";</P>
4 I+ R, A) A9 B<>      ((TBlobField*)(ClientDataSet1-&gtarams-&gtaramByName("picture")))-&gt;LoadFromStream(pm);7 l) v5 k+ S& A  x2 F5 B0 c
        delete pm;
$ ^! c1 N; D7 Z$ I        ClientDataSet1-&gt;Execute();
( x* f: T' ^4 f$ d( j     }</P>8 D( r; D8 h1 H+ R+ y+ V
<>在运行期间出错误 </P>' `) g# O/ B0 S6 s1 p' P' w) H
<>rject project1.exe raised exception class 7 J$ n, s5 a; }1 Q
EAcessViolation with message ' Acess violation at address 40325fa4 in model+ `: }, ]3 c& T; d/ w
' dbrtl60.bpl '  read of address 94636b84</P>! t$ c$ e) I  X( M) ~
<>请问大哥们改如何的改正</P>6 R/ u8 j- @+ i  h
<>谢谢！！</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