[NOCaut]

Есть БД (DB2) В ней есть поле

Код:

  INFMS	VARCHAR	1400 байт 

читаю поле компонентом TSDQuery.

метод AsString и SaveToStream - возвращают пустые строки в чем дело?

Код:

 *
tream := TMemoryStream.Create;
try
  Stream.Position := 0;
  TBLOBField(FieldByName('INFMS')).SaveToStream(Stream);
  ShowMessage(IntToStr(Stream.Size)); // = 0
  l_TmpStr := StreamToString( Stream );
finally
  Stream.Free;
end;