Категории раздела
J2me|java [29]
Basic [6]
Delphix [21]
C+|C++|C# [3]
Pascal [10]
Другие [0]
языки которые не войшли в верхние разделы
Главная » Статьи » Программирования » Delphix

Преобразовать из JPEG в BitMap
Uses JPEG;
...
Function JPEG_to_BMP(jpg:TJPEGImage):TBitMap;
begin
  Result := TBitmap.Create;
  Result.Assign(jpg);
end;


Пример использования:

Procedure TForm1.Button1Click(Sender: TObject);
var jpg:TJPEGImage;
    bmp:TBitMap;
begin
  jpg := TJPEGImage.Create;
  bmp := TBitMap.Create;

  jpg.LoadFromFile('d:\1.jpg');

  bmp:=JPEG_to_BMP(jpg);
end;
Категория: Delphix | Добавил: graimp (21.12.2011)
Просмотров: 162 | Рейтинг: 0.0/0
Всего комментариев: 0
Имя *:
Email *:
Код *:
Наш опрос
На каком языке лучше программировать
Всего ответов: 38
Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0