Vielen Dank an alle für die vielen Antworten! Ich habe mich schlussendlich doch den PNGs ergeben und dieser Code hat mein Problem dann endgültig beseitigt:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
Stream: TMemoryStream;
Image: TPngImage;
begin
Stream := TMemoryStream.Create;
try
// PNG-Bild erhalten, aus Datei oder anderem laden...
// Beispiel: Stream.LoadFromFile('c:\\file.png');
Stream.LoadFromFile('kw.png');
Stream.Position := 0;
Image := TPngImage.Create;
try
Image.LoadFromStream(Stream);
Image1.Picture.Graphic := Image;
Image1.BringToFront();
finally
Image.Free;
end;
finally
Stream.Free;
end;
end;
Danke nochmal, ohne euch wäre ich aufgeschmissen
