Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi FreeAndNil geht nicht (https://www.delphipraxis.net/39067-freeandnil-geht-nicht.html)

sakura 28. Jan 2005 13:09

Re: FreeAndNil geht nicht
 
Zitat:

Zitat von Hansa
Ich bitte deshalb um Aufklärung, ob das jetzt so wasserdicht ist und warum.

Nichts ist wasserdicht, das ist nun mal das Leben. Aber es ist so gut wie dran, wenn zwischen dem Free und dem nil nicht gerade eine Exception auftritt. Kannst ja noch ein try...finally...end drumsetzen. Dann ist es garantiert nil am Ende, nur ob es Free ist. Wie jetzt ist es vielleicht Free, aber ob es nil ist wenn der PC abraucht :gruebel:

Zitat:

Zitat von Hansa
Insbesondere, weil ja das aufgerufebe Destroy leer ist. :wiejetzt: <-- der ist manchmal gut. :lol:

Das Destroy ist nur die Basis-Funktion, welche als solche leer ist. Im Hintergrund greift aber noch Delphis Compiler-Magic und gibt den nötigen Speicher frei ;)

...:cat:...

Hansa 28. Jan 2005 13:28

Re: FreeAndNil geht nicht
 
Du meinst also, es wäre gut so ? Na, dann ist ja gut. :mrgreen: Ich vermute mal, destroy ist als abstract definiert und erst im STringgrid wird es mit Leben erfüllt. Werde mal später in der RTL und dann auch in Grids rumgraben und nachsehen. 8)

Jetzt aber noch eine Frage am Rande : solche Sachen sind teilweise, wie hier, nicht so einfach nachzuvollziehen. Kann man das auch testen ? Früher hatte es gereicht, das mit memavail zu machen. Wie kann man so was machen ? Memcheck vielleicht (oder wie das heißt) ? In dem konkreten Fall hier kann es passieren, daß mehrmals zig Eingaben in das Grid gemacht werden. Da könnten schnell 1000 oder mehr Zeilen zusammenkommen. Schleppe ich jetzt noch zu jeder Zelle ein TObject mit, dann wäre es schon interessant zu wissen, wie sich das auf den Speicher auswirkt, sofern das free vergessen wird oder sonst was verändert wird.

Touchdown 28. Jan 2005 13:30

Re: FreeAndNil geht nicht
 
Mach einen Typcast drauf und gut is :-D

Delphi-Quellcode:
FreeAndNil (TObject(sg.Objects [i,j]));
Hab es jetzt nicht getestet aber sollte gehen.

Es gibt ja keine Objekte die nicht von TObject abgeleitet sind, also unsauer ist es deshalb auch niemal.

Hansa 28. Jan 2005 13:34

Re: FreeAndNil geht nicht
 
Aha, ja, wer weiß ? 8) Ich warte lieber mal noch auf Sakura. :mrgreen:

Sprint 28. Jan 2005 13:39

Re: FreeAndNil geht nicht
 
Zitat:

Zitat von Hansa
dann wäre es schon interessant zu wissen, wie sich das auf den Speicher auswirkt, sofern das free vergessen wird oder sonst was verändert wird.

Du kannst auch deine Objekte schon in TObjectList verwalten, dann brauchst du dich nicht selber drum zu kümmern.

sakura 28. Jan 2005 13:39

Re: FreeAndNil geht nicht
 
Zitat:

Zitat von Touchdown
Mach einen Typcast drauf und gut is :-D
Hab es jetzt nicht getestet aber sollte gehen.

Geht nicht, das FreeAndNil eine Variable erwartet. Du kannst also auch folgendes machen:
Delphi-Quellcode:
var
  O: TObject;
...

  O := sg.Objects [i,j];
  sg.Objects [i,j] := nil;
  FreeAndNil(O);
Nur: Das bringt keinen Vorteil :roll:

...:cat:...

teebee 28. Jan 2005 16:20

Re: FreeAndNil geht nicht
 
Zitat:

Zitat von Hansa
Jetzt aber noch eine Frage am Rande : solche Sachen sind teilweise, wie hier, nicht so einfach nachzuvollziehen. Kann man das auch testen ? Früher hatte es gereicht, das mit memavail zu machen. Wie kann man so was machen ? Memcheck vielleicht (oder wie das heißt) ?

Ich benutze sehr gerne MemProof.
Gruß, teebee


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:42 Uhr.
Seite 2 von 2     12   

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 by Thomas Breitkreuz