Die Zuweisung
TPicture.Graphic := TBitmap.Create;
veranlasst, dass der Inhalt der Bitmap-Instanz in die Graphic-Instanz
kopiert (per
Assign
) wird.
Die Bitmap-Instanz wird also
nicht übernommen, von dir nicht freigegeben und dümpelt so bis zum Ende im Speicher rum -> Leck
(Ein Blick in den Setter-QuellCode hätte dir das auch verraten
)
EDIT: Gerade gesehen, selbst die Dokumentation ist da eindeutig
TPicture.Graphic
Zitat:
Anmerkung: Wenn die Eigenschaft Graphic zugewiesen wird, weist TPicture die Eigenschaften eines anderen TGraphic-Objekts zu. TPicture wird nicht der Eigentümer des angegebenen Objekts.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)