Einzelnen Beitrag anzeigen

Benutzerbild von dummzeuch
dummzeuch

Registriert seit: 11. Aug 2012
Ort: Essen
1.623 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#2

AW: Bitmap nach Assign leer. Warum?

  Alt 9. Nov 2020, 11:54
ich weise die Bitmap eines TImage einer anderen Bitmap zu und dann wieder zurück:

Delphi-Quellcode:
procedure TForm26.Button1Click(Sender: TObject);
var
  BmpTmp: TBitmap;
begin
  BmpTmp := TBitmap.Create;
 
  BmpTmp.Assign(Image1.Picture.Bitmap);
  Image1.Picture.Bitmap.Assign(BmpTmp);

  BmpTmp.Free;
end;
Danach ist das Image leer.

Warum? Was mache ich falsch?

Ist Image1.Picture vorher schon eine Bitmap? Wenn nein, wird das nicht funktionieren. Es gibt keine automatische Konvertierung bei der Zuweisung.
Thomas Mueller
  Mit Zitat antworten Zitat