TImage.Picture.Icon Verständisfrage

[Shark99]

Ich lade ein 24Bit 16x16 Pixel PNG Image in ein TImage (Autosize True).
Image1.Picture.LoadFromFile(ExtractFilePath(ParamStr(1))+'testimage.png' )
Das Bild wird korrekt angezeigt.

Image1.Picture.Bitmap.Width gibt 16 aus.

Wenn ich nun (sogar nur lesend) auf Image1.Picture.Bitmap oder Image1.Picture.Icon zugreife (in dem Fall weise ich Image1.Picture.Icon einem anderen TIcon Objekt mit assign zu) dann wird das Bild sofort leer, Image1.Picture.Bitmap.Width wird 0 und es kracht Fehler.

Wenn ich die Delphi Anleitung zur Hilfe nehme steht folgendes drin:

"If Icon is referenced when the TPicture contains a Bitmap or Metafile graphic, the graphic won't be converted. Instead, the original contents of the TPicture are discarded and Icon returns a new, blank icon."

Also ist laut Delphi Hilfe dieses Verhalten korrekt.

Nun meine Frage, was passiert hier eigentlich, wieso wird also ein blankes Icon erzeugt?

Wie kann ich es umgehen, also aus dem Bild welches in einem TImage steckt ein TIcon mit dem gleichen Inhalt erzeugen?