Пытаюсь запихать JPEG в поле binary... Проблемы похоже...

← →
Rub © (2002-05-14 09:51) [0]

Есно с Bitmap-ами все зашибись.

Вся проблема в том, что при попытке "объяснить" что такое JPEG (функция RegisterFileFormat) ошибки не возникает, однако в списке графических файлов JPEG не появляется.
А при выборе такого файла (обычным, а не Image диалогом) вылетает исключение "некорректный формат" (при попытке выполнить инструкцию DBImage->Picture->LoadFromFile(FName);).

Как быть? Перечитал всю доку по етой самой RegisterFileFormat но там весьма скудно...

Код:

OpenPictureDialog->Execute();
AnsiString FName = OpenPictureDialog->FileName;

ADOQuery->Append();
DBImage->Picture->RegisterFileFormat(__classid(Graphics::TBitmap), "jpg", "jpg", __classid(Graphics::TBitmap));
DBImage->Picture->LoadFromFile(FName);
ADOQuery->Post();

← →
Rub © (2002-05-14 10:12) [1]

Неужели никто не подскажет - Delphi-сты?

← →
wicked © (2002-05-14 10:14) [2]

а jpeg подключал?...
в delphi это просто - uses jpeg...

← →
Desdechado © (2002-05-14 10:22) [3]

чтобы запихать jpeg (или что угодно) в Binary, не нужно регистрировать форматы и использовать DBImage. Просто LoadFromFile и влетит как миленькое

← →
Rub © (2002-05-14 10:28) [4]

Все дело в том, что ругается именно на DBImage->Picture->LoadFromFile(FName);
Потому как не понимет, что такое жпег...

Как подключить jpeg - без понятия...

← →
Lusha © (2002-05-14 10:38) [5]

>Rub © (14.05.02 10:28)
#include "jpeg.hpp"...
...и разумеется TJPEGImage, а не TBitmap в качестве параметра функции RegisterFileFormat...

← →
Rub © (2002-05-14 11:02) [6]

2 Lusha:

DBImage->Picture->RegisterFileFormat(__classid(Graphics::TBitmap), "jpg", "jpg", __classid(Graphics::TBitmap));

Не совсем понятно, что есть первый и что есть второй класс.
И где менять TBitmap на TJpegImage???

← →
wicked © (2002-05-14 11:05) [7]

2 Rub ©

> Не совсем понятно, что есть первый и что есть второй класс.
> И где менять TBitmap на TJpegImage???

а справку прочесть?... имхо там это должно быть...

Все дело в том, что и в Дельфях и в Билдере справка весьма скудна и там на сей счет написанно ОДНО И ТОЖЕ И нефига неясно, а примеров нет. Может кто-нить использовал и может подсказать?

← →
Reindeer Moss Eater (2002-05-14 11:48) [9]

Если надо "запихать JPEG в поле binary" то это можно сделать вообще без TJpegImage.

TBlobField.LoadFromFile(JpegFileName);

Просто ты хочешь одно, а спрашиваешь про другое

Получилось, всем спасибо...

DBImageM->Picture->RegisterFileFormat(__classid(TJPEGImage), "jpg", "jpg", __classid(TJPEGImage));

Однако TDBImage "не хочет отображать" JPEG-и.
Как бы его научить это делать?

В конструкторе окна выполняю инструкцию:
DBImageM->Picture->RegisterFileFormat(__classid(TJPEGImage), "jpg", "jpg", __classid(TJPEGImage));

Однако не помогает, пишется нормально, но не показывается...

Пытаюсь запихать JPEG в поле binary... Проблемы похоже... Найти похожие ветки