Скачать: CL | DM;

Такая проблема.... Нужно запихать рисунок JPG на рабочий стол.....   Найти похожие ветки 

← →
Ежик ©   (2002-03-13 09:50) [0]

Знаю как все это проделать с BMP форматом, а вот как сделать чтоб JPG грузился?

Заранее Благодарен!
С Уважением Ежик.

---

← →
Writer ©   (2002-03-13 12:01) [1]

BitBlt - нужная тебе API, В TImage грузишь JPG, он сие поддерживает, а потом копируешь из оного на десктоп...

---

← →
Donal_Graeme   (2002-03-13 12:17) [2]

если имеется ввиду установка картинки в качестве обоев, то только при включённом Active Desktop. В общем же случае нужно конвертировать в bmp формат. Лично я так и сделал, когда писал changer обоев :-)

---

← →
Ежик ©   (2002-03-13 14:30) [3]

Donal_Graeme

Примерчик не вышлешь? Хочу разобраться с конвертированием...

---

← →
Donal_Graeme   (2002-03-13 14:43) [4]

например, так :

uses JPEG;

procedure JPEGtoBMP (JPEGname, BmpName: AnsiString);
var JPGImage: TJPEGImage;
BMPImage: TBitmap;
begin
JPGImage := TJPEGImage.Create;
BMPImage := TBitmap.Create;
JPGImage.LoadFromFile (JPEGname);
BMPImage.Assign (JPGImage);
BMPImage.SaveToFile (BmpName);
BMPImage.Free;
JPGImage.Free;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c