急：OleCotainer问题？（高分相送）

我加分，加！加！加！加！加！！！！！！！

解决方案 »

  1.   

    我前几天问了个和你差不多的问题，不过可惜强烈关注你的问题
      

  2.   

    OleContainer1.OldStreamFormat:=true;
    OleContainer1.SaveToFile ('c:\aaa');
    OleContainer2.OldStreamFormat:=true;
    OleContainer2.LoadFromFile ('c:\aaa');
    ole 嵌入的试验成功代码可是我想通过blobstream将其存到数据库，不存成文件就没试成功
    我用的是access数据库，建了个ole型字段
     var
    streama : TMemoryStream;
    begin
      streama := TmemoryStream.Create;  OleContainer1.OldStreamFormat:=true;
      OleContainer1.DoubleBuffered := true;
      OleContainer1.SaveToStream(streama) ;
      streama.Position := 0;
      OleContainer2.OldStreamFormat:=true;
      OleContainer2.loadfromstream(streama1) ;
      end;
    这也能用，可是怎么也转不成数据库字段内容，希望以上代码能帮到你同时也希望大家帮帮俺
      

  3.   

    我再加分，加！加！加！加！加！！！！！！！ 
      

  4.   

    还有人能给出更满意的答案吗？
      

  5.   

    电脑编程技巧与维护第12其31夜有一篇专门论述这个内容的文章，所副光盘中有原玛