Форум: "Основная";
Текущий архив: 2003.02.27;
Скачать: [xml.tar.bz2];
ВнизЗагрузка JPG с диска в DXImageList Найти похожие ветки
← →
Main.php (2003-02-18 15:54) [0]Как это осуществить подскажите, пожалуйста. BMP вроде загружает а вот JPG чё то не хочет.
← →
Андрей Сенченко (2003-02-18 15:57) [1]Что такое DXImageList я честно говоря не знаю ...
Вот это может поможет ....
Procedure bmp2jpg(bmpname,jpgname : PChar);
var
JPGpic: TJPEGImage;
BMPpic: TBitmap;
begin
JPGpic := TJPEGImage.Create;
BMPpic := TBitmap.Create;
Try
BMPpic.LoadFromFile(BMPName);
JPGpic.Assign(BMPpic);
JPGpic.SaveToFile(JPGName);
Finally
JPGpic.Free;
BMPpic.Free;
End { Try }
end;
Procedure jpg2bmp(bmpname,jpgname : PChar);
var
JPGpic: TJPEGImage;
BMPpic: TBitmap;
begin
JPGpic := TJPEGImage.Create;
BMPpic := TBitmap.Create;
Try
JPGpic.LoadFromFile(JPGName);
BMPpic.Assign(JPGpic);
BMPpic.SaveToFile(BMPName);
Finally
JPGpic.Free;
BMPpic.Free;
End { Try }
end;
← →
Main.php (2003-02-18 16:07) [2]А на экран как паказать её ?
← →
Main.php (2003-02-18 16:09) [3]Всё уже понял.
← →
Андрей Сенченко (2003-02-18 16:10) [4]В смысле как ?
Ты ж сказал что Твой компонент нормально грузит BMP. Если Ты внимательно посмотришь на приведенный код, то поймешь, что это процедуры ковертации из JPG в BMP и обратно. Просто конвертируй нужный файл JPG в формат BMP и грузи его в свой компонент.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.02.27;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c