помогите с Blob и BlobStream в базе данных Interbase [D6]
URSUS © (2003-06-08 18:25:00)
var TBS:TBlobStream;
...
try
TBS:=TBlobStream.Create(FieldByName("Body") as TBLOBField,
bmReadWrite);
Memo1.Lines.SaveToStream(TBS as TStream);
TBS.Free;
except
ShowMessage("Не вышло!");
end;
Ругается на создание TBS - "Invalid class typecast"!
Не знаю что делать, посоветуйте что-нибудь.
kaif (2003-06-08 21:16:00) [1]
Во-первых, постарайся вместо TBlobStream использовать
TIBBlobStream. Во-вторых, проверь тип поля "Body".
Может оно не TBlobField или не потомок TBlobField. Кстати,
учти, что TIBBlobStream наследует прямо от TStream, а не от
TBlobStream. Возможно дело в этом, с виду вроде все
нормально.
Наверх 
ЧАТ |
Орешник |
|
