在delphi中将oracle中的clob字段输出的问题,在线!!

                            
我先将数据存入数据库中:   
              MasterStream:=TMemoryStream.Create;  
              MasterStream.Clear;  
              cdsMaster.SaveToStream(MasterStream,dfXML);  
              MasterStream.Position:=0;  
              DetailStream.Position:=0;  
              with   ADOQIn   do  
              begin  
                  edit;  
                  TblobField(FieldByName('RECORDSETMASTER')).LoadFromStream(MasterStream);  
                  post;  
              end;  
  然后在另外的程序中导出字段RECORDSETMASTER的值:  
                  MasterStream:=TMemoryStream.Create;  
                  MasterStream.Clear;  
                  TblobField(ADOQGetData.FieldByName('RECORDSETMASTER')).SaveToStream(MasterStream);  
                  MasterStream.Position:=0;  
                  MasterStream.SaveToFile('c:\test.xml');  
                  MasterStream.Position:=0;  
                  cdsMaster.LoadFromStream(MasterStream);  
  运行的时候要报错!  
              “Mismatch   in   datapacket.”  
  我发现test.xml里面的内容与数据库中的内容不一致,少了许多!  
  各位看看,是怎么回事???

查看回复