Изменение оттенка картинки в формате Png

[t2skler]

В своей программе хочу осуществить поддержку стилей. Для этого на форме уже имеються картинки, осталось изменять их оттенок в соответствии со цветовой схемой. В интернете видел несколько примеров, но это только для Bmp. В связи с этим хочу поинтересоваться у форумчан, может быть кто-нибудь сталкивался с такой проблемой?

[Пепел Феникса]

изменять напрямую JPG все равно нельзя, так что конвертить в BMP(можно внутри программы, а не в ресурсах)

[t2skler]

Сообщение от Пепел Феникса

изменять напрямую JPG все равно нельзя, так что конвертить в BMP(можно внутри программы, а не в ресурсах)

Я говорил про png, а разве нельзя получать цвет каждого пикселя картинки изменять его оттенок и уже его отображать?

[Человек_Борща]

png > BMP > преобразование пикселей > png

[Dеlphi]

преобразуй его с начало в bmp (Tbitmap) а потом делай с ним что хочешь, потом обратно в png если надо

[t2skler]

Сообщение от Человек_Борща

png > BMP > преобразование пикселей > png

Жаль, я предполагал, что всё как-то оптимизированней можно сделать

[Пепел Феникса]

а как оптимизированней?
отображается то все равно битмап, а не png

[Человек_Борща]

хатя нет.. думаю можно..
в delphi 2010 есть стандартный png класс

Вот что у меня получилось без преобразования в bmp.

procedure TForm2.Button1Click(Sender: TObject);
var
  png: TPngImage;
  i, j: Integer;
begin
  png := TPngImage.Create;
  png.LoadFromFile(myDir + 'File.png');

  for i := 1 to 50 do
  begin
    for j := 1 to 50 do
    begin
      png.Pixels[i, j] := ClGray;
    end;
  end;
   png.PixelInformation.
  Image1.Picture.Assign(png);
  png.free;
end;

есть доступ к пикселям картинки. Но сам никогда не делал картинки серыми по этому хз как.

[eduard93]

Чтобы предоставить доступ к пикселям, TPngImage создает внутренний битмап.

[Человек_Борща]

Спасибо, я не знал об этом!