Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как распознать какой тип рисунка при загрузке из BLOB поля [D6, IBExpert]


Страницы:   1 2

TATIANA ©   (2004-05-12 08:50:00) 

Здравствуйте господа !
Из BLOB - поля требуется загрузить рисунок в Image , но рисунок может быть Bmp , а может быть и Jpg , как распознать при создании изображения :
var Bm2:TMemoryStream;
// Jp2:TBitmapImage; -  Bmp
   Jp2:TJPEGImage;   -  Jpg
begin
 Bm2:= TMemoryStream.Create;
 IBQuery1PLAN_KV.SaveToStream(Bm2);
 Bm2.Position := 0;
// Jp2 := TBitmapImage.Create;  - Bmp
 Jp2 := TJPEGImage.Create;      - Jpg
 Jp2.LoadFromStream(Bm2);
 Clipboard.Assign(Jp2);
//  Image1.Picture.Bitmap.Assign(Jp2);
 Image1.Picture.Assign(Clipboard);
 Bm2.Free;
 jp2.Free;
Если рисунок Bmp - Jp2 := TBitmapImage.Create;  ;
Если рисунок JPG - Jp2 := TJPEGImage.Create;   ,
Как же узнать , в каком случае - какой Jp2  создавать ?
Всем спасибо .


sniknik   (2004-05-12 09:05:00) [21]

у ни префикс (первые 2 байта) должны быть разные, посмотри.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо