Bitmap nach Assign leer. Warum?

[Delbor]

Hi zusammen

Zitat von Neutral General:

Graphic ist immer gefüllt und egal welches Bildformat geladen ist, die Konvertierung zu BMP sollte ohne Probleme funktionieren.
Image1.Picture.Bitmap ist wirklich nur gefüllt wenns ein Bitmap ist. Picture.Graphic ist quasi die Verallgemeinerung und ist immer gefüllt wenn ein Bild geladen ist.

Fast hätte ich dir jetzt widersprochen, denn was ich zuerst gelesen habe:

Zitat von Neutral General:

Graphic ist immer gefüllt

Und das stimmt so nicht - TImage.Picture.Graphic ist nur dann gefüllt, wenn da auch eine Grafik (in den möglichen Formaten) enthalten ist. Der Vorteil des Programmierers: er kann auf die Grafik zugreifen, ohne deren Format zu kennen (zumindest vorerst).

Am Ende hab ich dann doch noch deinen Schlussatz gesehen:

Zitat von Neutral General:

Image1.Picture.Bitmap ist wirklich nur gefüllt wenns ein Bitmap ist. Picture.Graphic ist quasi die Verallgemeinerung und ist immer gefüllt wenn ein Bild geladen ist.

Im vorliegenden Fall könnte er Image1.Picture.Bitmap auf NIL abfragen:

Delphi-Quellcode:

if not (Image1.Picture.Bitmap = NIL) then
begin
// hier etwas mit der Bitmap anstellen. 
end;

Wenn der Ausdruck False ist (if Not, also False, ist nicht der Fall) ist eine Grafik im Bitmapformat vorhanden. Andernfalls ist keine Bitmap vorhanden, aber eventuell eine Metagraphik.

Du kannst aber bei TPicture auch eigene Grafikformate regisrieren:

Delphi-Quellcode:

TPicture.RegisterFileFormat('NEF','NEF Format',TWICImage);
TPicture.RegisterFileFormat('TIFF','TIFF Format',TTiffGraphic);

Alle Klarheiten beseitigt?

Gruss
Delbor

[freejay]

Mein lieber Herr Gesangsverein! Da hab' ich ja wieder mal ordentlich was gelernt. Trotz über 20 Jahren Delphi bin ich im Bereich Grafik nämlich ziemlich blank...

Danke an alle!

[Uwe Raabe]

Zitat von Delbor:

Im vorliegenden Fall könnte er Image1.Picture.Bitmap auf NIL abfragen:

Das wird nicht viel nützen, denn allein der Aufruf von Bitmap löscht eine eventuell vorhandene Graphic-Instanz, wenn sie kein TBitmap ist. Bitmap wird also niemals nil sein.

Übrigens genau das passiert im Originalcode. In der Zeile BmpTmp.Assign(Image1.Picture.Bitmap); wird ein eventuell vorhandenes (non-Bitmap-)Image gelöscht und eine leere TBitmap zurückgegeben.