TImage wird bei Zugriff auf Height /Width gelöscht ?

[himitsu]

Nee, genauso wie du du mit Graphic := GraphicClass.Create; , erstellt sich TPicture intern eine Kopie deiner an Assign übergebenen, bzw. an TPicture.Graphic zugewiesenen, Instanz.

TPicture ist praktisch nur ein Kontainer, welcher direkt die entsprechende TGraphic-Instanz enthält, welche man dort reinpackt.

.Bitmap und .Icon sind nur direkte Zugriffe auf bestimmte Typen, ohne daß man sich .Graphic erst in diesen Typen casten muß.
Beim Zugriff auf einen falschen/anderen Typen gibt es aber leider keine Exception, sondern der Typ wird einfach angepaßt, ohne den Bildinhalt in die neue Instanz zu kopieren. (wobei das Kopieren eh nicht immer geht, da z.B. ein TBitmap mit den Transparenzen von Icon, PNG und Co. nicht umgehen kann)