| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
IMAGE [D5, WinME]
kay © (2002-03-17 10:33:00)Народ, как сделать, чтоб IMAGE распознавала не только *.bmp, но и *. jpg?
Serghei (2002-03-18 09:17:00) [1]Вот обратная процедура (из D3)
var
MyJpeg: TJpegImage;
Image1: TImage;
begin
Image1:= TImage.Create;
MyJpeg:= TJpegImage.Create;
Image1.LoadFromFile("TestImage.BMP"); // Чтение изображения из файла
MyJpeg.Assign(Image1.Picture.Bitmap); // Назначание изображения объекту MyJpeg
MyJpeg.SaveToFile("MyJPEGImage.JPG"); // Сохранение на диске изображения в формате JPEG
end;
Song (2002-03-18 08:41:00) [2]TJpeg соответственно. Возьми да посмотри исходники Unit jpeg
MK (2002-03-17 23:32:00) [3]>> Song
Извините, а у jpeg_картинка какой тип данных:
Image1.Picture, Image1.Picture.Graphic или какой? При исполнении возникает ошибка и до SaveToFile не доходит...
Song (2002-03-17 22:07:00) [4]... // Создаём TBitMap;
With BitMap Do
Begin
Assign(jpeg_картинка);
SaveToFile("1.bmp");
End;
... // Очищаем TBitMap;
MK (2002-03-17 21:08:00) [5]>> Song
Попробуй теперь записать в файл через SaveToFile... Картинка bmp формата, то все ОК, если jpg - файл пустой. Если Записать в файл jpg через Image1.Picture.SaveToFile(somefile), то формат картинки, понятное дело, будет jpg. Если jpg записать через Image1.Picture.BitMap.SaveToFile(somefile), то файл пустой. Как записать jpg как bmp?
Song (2002-03-17 16:22:00) [6]Картинка загружена в TImage следовательно чтобы получить BitMap нужно такую иеархию: Image1.Picture.BitMap
Zool (2002-03-17 15:08:00) [7]>>MK
Точнее
MK (2002-03-17 14:01:00) [8]Вопрос в догонку... Как к загруженной таким образом jpg картинке обраться как к bmp?
MBo (2002-03-17 10:38:00) [9]uses Jpeg;
| |
