![]() |
Re: Methode "Free" selbst implementieren (Assemble
Zitat:
...:cat:... |
Re: Methode "Free" selbst implementieren (Assemble
Es ging mir darum, daß eventuell an das Object angehangene Objekte ebenfalls freigegeben werden oder auch nicht. Je nachdem, ob diese noch benötigt werden/an andere Stelle referenziert sind.
|
Re: Methode "Free" selbst implementieren (Assemble
Zitat:
|
Re: Methode "Free" selbst implementieren (Assemble
Zitat:
|
Re: Methode "Free" selbst implementieren (Assemble
Dann setze dir doch ein Flag in der Klasse, sobald du irgendwas erstellst, das wieder freigeben werden muss. Dieses Flag fragst du dann im Destruktor ab und reagierst dann entsprechend..
|
Re: Methode "Free" selbst implementieren (Assemble
Zitat:
|
Re: Methode "Free" selbst implementieren (Assemble
Wenn du das Flag in der Klasse beim setzen einer Eigenschaft setzt, hast du dieses Problem schon gelöst ;) Was schon getan ist, kann man ja nicht mehr vergessen :) Oder hab' ich was falsch verstanden? :gruebel:
|
Re: Methode "Free" selbst implementieren (Assemble
weiss zwar nicht was da standardmässig in eax steht aber so könnte es gehen:
Delphi-Quellcode:
procedure dosomething;
begin showmessage('parameter wurde an free übergeben'); end; procedure TObject.Free(myparam:boolean); stdcall; asm TEST EAX,EAX JE @@exit MOV ECX,[EAX] CALL dword ptr [ECX].vmtDestroy pop eax cmp eax, 1 jne @@exit call dosomething @@exit: end; |
Re: Methode "Free" selbst implementieren (Assemble
Zitat:
|
Re: Methode "Free" selbst implementieren (Assemble
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:49 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz