Forum: Object-Pascal / Delphi-Language
Delphi
by Uwe Raabe,
20. Dez 2023
TBitmap ist ja eine Klasse und in der TTest-Instanz wird nur ein Zeiger auf die TBitmap-Instanz gespeichert. Ebenso enthält das Directory nur Zeiger auf TTest-Instanzen.
Folgendes ist also problematisch:
function GetSomeText(AMyKey: string): string;
var
Test: TTest;
begin
Test := TTest.Create;
FDD.TryGetValue(AMyKey, Test);
Forum: Object-Pascal / Delphi-Language
Delphi
by Uwe Raabe,
20. Dez 2023
Was geschieht im weiteren Verlauf mit MyBitmap? Wird es irgendwie manipuliert oder freigegeben?
Es wäre auch interessant zu wissen was in LoadFromDB mit MyBitmap passiert, was uns aktuell noch verborgen wird.
Forum: Object-Pascal / Delphi-Language
Delphi
by Uwe Raabe,
20. Dez 2023
Im ListBoxOnClick wird MyBitmap ein leeres per TMyBitmap.Create zugewiesen, direkt darauf aber durch das Bitmap aus dem Dictionary überschrieben. Damit zeigt MyBitmap direkt auf die Instanz in dem Direktory. Es ist also von entscheidender Bedeutung, was darauf mit MyBitmap geschieht.