Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: Leeres TPNGImage erzeugen

    Delphi
    by Bummi, 28. Sep 2012
  procedure TForm3.Button1Click(Sender: TObject);
  
  var Img: TPNGImage;
  Bild: TPngImage;
  i:Integer;
  begin
  Bild:=TPNGImage.Create;
  Bild.LoadFromFile('C:\Icons\IconCollection\ix_ap_all\128x128\shadow\add.png');
  
  Img:=TPNGImage.CreateBlank(COLOR_RGBAlpha, 8, Bild.Width , Bild.Height);