Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.08.17;
Скачать: CL | DM;

Вниз

Почему генерируется ошибка?   Найти похожие ветки 

 
fog   (2008-07-11 02:34) [0]

procedure TForm1.ADODataSet1DescriptionGetText(Sender: TField; var Text: String; DisplayText: Boolean);
var bs: TBlobStream;
begin
bs := TBlobStream.Create(TMemoField(Sender), bmRead);

и получаю "Invalid class typecast"

Description - TMemoField

ошибка вылезает при начале заполнения DBGrid


 
Loginov Dmitry ©   (2008-07-11 07:56) [1]

> bs := TBlobStream.Create(TMemoField(Sender), bmRead);
>
> и получаю "Invalid class typecast"


А что ты ожидал получить? TBlobStream - это только для BDE. Для ADO используй TADOBlobStream. Кстати исключение возникает вот тут:

constructor TBlobStream.Create(Field: TBlobField; Mode: TBlobStreamMode);
var
 OpenMode: DbiOpenMode;
begin
 FMode := Mode;
 FField := Field;
 FDataSet := FField.DataSet as TBDEDataSet;


 
fog   (2008-07-11 13:35) [2]

Спасибо



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

Текущий архив: 2008.08.17;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.042 c
2-1215677312
Геннадий
2008-07-10 12:08
2008.08.17
Найти и удалить одинаковые вхождения в StringList ?


2-1215686242
S@shka
2008-07-10 14:37
2008.08.17
Получить HWND окна зная hInstance


2-1215953221
Sick
2008-07-13 16:47
2008.08.17
Как изменить заголовок окна?


2-1215801511
Чайник
2008-07-11 22:38
2008.08.17
Редактирование записи в базе


15-1214980351
Dennis I. Komarov
2008-07-02 10:32
2008.08.17
WiFi P2P У кого есть опыт?