| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Показ JPEG-ов средствами TDBImage... [MSSQL, BC++ Builder 5.0]
Rub © (2002-05-14 12:00:00)TDBImage "не хочет отображать" JPEG-и.
Как бы его научить это делать?
В конструкторе окна выполняю инструкцию:
DBImageM->Picture->RegisterFileFormat(__classid(TJPEGImage), "jpg", "jpg", __classid(TJPEGImage));
Однако не помогает, пишется нормально, но не показывается...
Sandman (2002-05-14 21:16:00) [1]кажися нада прописать jpeg.pas в uses
Reindeer Moss Eater (2002-05-14 14:10:00) [2]Вот пример с обычным TImage и FileStream. Все легко переделывается для BlobStream и TDBImage.
uses Jpeg;
var jpg:TJPEGImage; f:TFileStream;
begin
jpg:=TJPEGImage.Create;
f:=TFileStream.Create("c:\coolgirl.jpg",fmOpenRead);
f.Position:=0;
jpg.LoadFromStream(f);
Image1.Picture.Assign(jpg);
jpg.Free;
f.Free;
end;
Lusha (2002-05-14 14:06:00) [3]>Rub © (14.05.02 12:00)
Как бы его научить это делать?
Вероятно надлежащим образом переопределить обработчик TDBImage.Paint...
| |
