Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.27;
Скачать: CL | DM;

Вниз

Загрузка 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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
1-87397
Lesha
2003-02-17 09:24
2003.02.27
Альтернатива TChart


1-87564
V-Isa
2003-02-17 14:18
2003.02.27
Покидание компонента курсором мыши


7-87715
S.A.S.
2002-12-27 12:39
2003.02.27
WinXP, не инсталируются проги


1-87545
Антон.
2003-02-17 11:27
2003.02.27
Кто нибудь знает зачем может использоваться qtintf70.dll


7-87713
Digitman
2002-12-25 13:52
2003.02.27
Взаимодействие с процессом Services.exe