Zitat von
marabu:
wenn SetLength(v, 0) zuerst ausgeführt wird, dann kommt Finalize(v, Length(v)) doch nach der Feier.
Hat sich eigentlich schon irgendwer die SetLength Funktion für dyn. Arrays in der System-
Unit angeschaut? Anscheinend nicht.
Das hier diskutierte kommt mir mehr so vor:
Delphi-Quellcode:
MyObj := TMyObj.Create;
...
MyObj.Free;
MyObj := nil;
MyObj.Free;
MyObj := nil;
MyObj.Free;
MyObj := nil;
MyObj.Free;
MyObj := nil;
MyObj.Free;
MyObj := nil;
MyObj.Free;
MyObj := nil;
So jetzt kann ich mir sicher sein, dass MyObj auch wirklich freigegeben wurde.
Finalize muss man
nur Aufrufen, wenn man auf New und Dispose bei
Zeigern auf Records verzichtet, also die Compile-Magic umgeht.
Delphi-Quellcode:
var P: PMyRec;
begin
New(P);
...
Finalize(P);
FreeMem(P); // Statt Dispose gleich direkt freigeben, macht zwar keinen Sinn, aber wers so will
end;
Bei dynamischen Arrays übernimmt der Compiler genauso wie bei Strings automatisch die Initialisierung und Finalisierung. Da muss man nichts selbst einfügen. Das Delphi 4 da noch einen Bug hat, der von einem Update dann aber behoben wurde (wenn ich mich recht erinnere), heißt noch lange nicht, dass Delphi 5, 6, 7, 8, 2005 diesen Bug auch haben.