oracle中blob字段读不到数据

[jsweifen]

    Close;
    SQL.Text := 'select tid,tdata from device_param where tid=' + IntToStr(vid) ;
    Open;

    First;
    if not Eof then
    begin
      (FieldByName('tdata') as TBlobField).SaveToStream(ms);
      ms.Position :=0;
      ms.read(RecBuf[0],129);

在oracle中能查询到blob字段的数据长度129,但无法读取到数据,ms的大小为0

[jsweifen]

不是clear的问题。
自己已解决

[jsweifen]

up

[J198728]

mark一下，close后是不是应该加个clear: