delphi2009 png resim ekleme

[forumsad]

arkadaşlar delphi2009 da png resim ekleyebilmek için ücretsiz bir kompenant bilen var mı

teşekkürler

[SimaWB]

PngComponents for Delphi 2009-XE7

[SimaWB]

Ayrıca: Png Components Package

[brs]

SimaWB hocam bilgilendirmiş, Ayrıca Mrmarman Hocamın paylaştığı kod bu arada kulaklarını çınlatayım kendisin bir süredir formda aktif olarak göremiyoruz sanırım iş yoğunluğundadır...

Formma bir tane ImageList ekle

Kod: Tümünü seç

Procedure ResimAtamasi(ImageList: TImageList; Idx: Integer; Hedef: TBitmap);
begin
  Hedef.Width := ImageList.Width;
  Hedef.Height := ImageList.Height;
  ImageList.Draw(Hedef.Canvas, 0, 0, Idx);
end;

Kod: Tümünü seç

procedure TForm3.FormCreate(Sender: TObject);
begin 
    ResimAtamasi(ButonList, 0, Ara.Glyph);
    ResimAtamasi(ButonList, 1,Sil.Glyph);
    end; }
end;

[forumsad]

Cok tesekkurler arkadaslar
saygilarimla