der code schaut jetzt so aus:
Delphi-Quellcode:
// Speichern
procedure TForm7.speichern(Sender: TObject);
begin
try
Image1.Picture.SaveToFile('TestBitmap.bmp');
finally
ShowMessage('Bild wurde gespeichert.');
end;
end;
das gespeicherte bild ist aber immer noch komplett schwarz
