Несколько простых вопросов.

← →
RRRA (2002-01-11 20:11) [0]

1.Как сохранить *.jpg файл в *.bmp файл средствами Делфи?
2.Есть код:
image.Picture.Bitmap.Canvas.Pixels[x,y]
for i:=0 to image.Picture.Bitmap.Width-1 do
for j:=0 to image.Picture.Bitmap.Height-1 do color:=image.Picture.Bitmap.Canvas.Pixels[i,j];
listbox1.items.add(inttostr(color));
то цвета пикселей (в listbox1) будут выглядеть примерно так: 16744576, 16777215. Что это такое? В смысле, что это за цифры? И каким образом можно еще переработать параметр color (кроме inttostr(color))? Когда я говорю "переработать", подразумеваю перевод значения color в какое-то строковое значение.
3. При выполнение выше указанного кода почему-то закрашивается вся форма цветами bitmapa? Почему так происходит и как этого избежать?
Зы Заранее благодарен.

← →
dima1111 (2002-01-14 09:57) [1]

Вот ответ на первый вопрос:
uses jpeg; procedure jpg2bmp; var j:tjpegImage; b:tbitmap; begin j:=tjpegImage.create; b:=tbitmap.Create; j.LoadFromFile("c:\banan.jpg"); b.Assign(j); b.SaveToFile("c:\banan.bmp"); end;

2. Посмотри описание типа TColor
это четырехбайтовое число. Младший байт отвечает за насыщенность красного, второй за зеленый а третий за синий.
А узнать что это за число можно разбив его на байты. еще проще сконвертить его в шестнадцатиричное число. В случае числа 16744576 это будет FF8080 т.е. насыщеность красного и зеленого 80h, а синего 255.

3. Все дело в строке
color:=image.Picture.Bitmap.Canvas.Pixels[i,j];
т.к. "color:=" это ты у формы свойство color меняешь.

Несколько простых вопросов. Найти похожие ветки