PNG-Picture in Anwendung hinzufügen

[SaFu]

Versuche es mal hiermit

Damit kannst du auch icons und Gif usw laden. Aber png hab ich noch nicht versucht

Delphi-Quellcode:

// die einbinden
Uses axCtrls;
.
.
.
.
procedure TForm4.FileListBox1Click(Sender: TObject);
var
  OleGraphic: TOleGraphic;
  fs: TFileStream;
begin
  try
    OleGraphic := TOleGraphic.Create;
    fs         := TFileStream.Create(FileListbox1.FileName, fmOpenRead or fmSharedenyNone);
    OleGraphic.LoadFromStream(fs);
    ImageBilderanzeige.Picture.Assign(OleGraphic);
  finally
    fs.Free;
    OleGraphic.Free
  end;
end;

Gruß sascha