Hallo zusammen,
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?
Danke & Gruß
Freejay