(HBITMAP)ADODataSet->FieldByName("Image")->Value.byref ???
От: Аноним  
Дата: 01.03.04 08:38
Оценка:
Здравствуйте.
Не могу никак победить такую задачу.
В базе данных на MSSQL в таблице содержиться поле типа image, есть процедура, которая читает заданное поле и возвращает указатель varbinary(16), т.е. — это указатель на картинку.
В borland 5 передаю этот указатель обьекту TImage такой строкой:
Image1->Picture->Bitmap->Handle=(HBITMAP)proc->Parameters->ParamByName("@ptrImage")->Value.byref;
при отладке вижу , что указатель передается, но изображение все равно не отображается.

Вообще изощряюсь так, потому что у обьекта TImage есть свойство AutoSize, которого нет о обьекта TDBImage. Требуется чтоб картинки просматривались в заданном окне с соблюдением пропорций, а размер картинок возможен разный.
Поделитесь мыслями.
Заранее благодарен.
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.