Вниз
Скачать: CL | DM;

Invalid typecast   Найти похожие ветки 

← →
Сатир   (2007-07-13 12:41) [0]

var MyBlobStream:TBlobStream

bagin
MyBlobStream := TBlobStream.Create(adsAppFilesFILE_BODY,bmRead)
на этом месте получается сабж.
adsAppFilesFILE_BODY - TBlobField

что я делаю не так?


← →
Сатир   (2007-07-13 12:41) [1]


> bagin

читать как begin
:-)


← →
Ega23 ©   (2007-07-13 12:46) [2]

MyBlobStream := TBlobStream.Create(adsAppFilesFILE_BODY,bmRead)

Разницу между TADODataSet и TBLOBField осчусчаешь?


← →
Сергей М. ©   (2007-07-13 12:47) [3]


> adsAppFilesFILE_BODY - TBlobField


Значит оно на самом деле не TBlobField.
Иные объяснения сабжу вряд ли найдутся)


← →
ЮЮ ©   (2007-07-13 12:52) [4]

TBlobStream.Create(Field: TBlobField; Mode: TBlobStreamMode);

> [2] Ega23 ©   (13.07.07 12:46)

TADODataSet - откуда взялся и куда девать?

Я, наоборот, боюсь, что DataSet какой нибудь IBSQL, который вовсе не TDataSet, и adsAppFilesFILE_BODY  не TBlobField


← →
Anatoly Podgoretsky ©   (2007-07-13 12:52) [5]

> Сатир  (13.07.2007 12:41:00)  [0]

Как определен adsAppFilesFILE_BODY


← →
Сатир   (2007-07-13 13:21) [6]


> Как определен adsAppFilesFILE_BODY

оперделён в дизайн-тайме
вот кусок dfm-ки:
object adsAppFiles: TADODataSet
    FieldDefs = <
     ...
     item
       Name = "FILE_BODY"
       DataType = ftBlob
     end>
     ...
     object adsAppFilesFILE_BODY: TBlobField
       DisplayLabel = #1058#1077#1083#1086
       FieldName = "FILE_BODY"
     end
     ...
end;


← →
Сатир   (2007-07-13 13:25) [7]

это... мож есть какой-то другой вариант реализации такого изврата?
просто в исходниках было вот так:
MyBlobStream := TBlobStream(adsSingleRow.CreateBlobStream(adsAppFilesFILE_BODY, bmRead));

но теперь у меня нету adsSingleRow, поэтому надо напрямую читать с поля...
о!
Можт вот так забацать:
MyBlobStream := TBlobStream(adsAppFiles.CreateBlobStream(adsAppFilesFILE_BODY, bmRead));
?


← →
Сатир   (2007-07-13 13:28) [8]


> MyBlobStream := TBlobStream(adsAppFiles.CreateBlobStream(adsAppFilesFILE_BODY,
>  bmRead));

ТАК ЗАРАБОТАЛО!!!
УРА!!!!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c
3-1183922494
IMHO
2007-07-08 23:21
2007.11.25
Zeos


2-1193990943
webpauk
2007-11-02 11:09
2007.11.25
Грамотно удалить компонет


2-1194034973
неугомонный
2007-11-02 23:22
2007.11.25
scrollbar stringgrid


8-1169983919
T54
2007-01-28 14:31
2007.11.25
Количество точек на дюйм - ?


15-1192629525
исследователь
2007-10-17 17:58
2007.11.25
ALTER TABLE в Delphi




   Наверх