Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Speicherleck, ABER warum?

  Alt 3. Sep 2007, 14:49
Moin bluethund,

erst einmal herzlich willkommen hier in der Delphi-PRAXiS.

also einen Grund für ein Speicherleck kann ich direkt nicht erkennen.
Es kann eigentlich nur noch an den Indys liegen. Da müsstest Du mal schauen (speziell natürlich in den Destruktoren)

Mir ist aber etwas anderes aufgefallen, nämlich Deine Verwendung des Resourcenschutzblockes.

Der Resourcenschutzblock macht erst Sinn, nachdem man eine Resource erfolgreich belegt hat.
Es sollte also so aussehen:

Delphi-Quellcode:
variable := TKlasse.Create;
try
  // Mach was mit der Resource
finally
  variable.free; // oder FreeAndNil(variable);
end;
Wenn ein Create schon schiefgeht, ist ein Freigeben nicht möglich.
(gilt analog natürlich auch für andere Resourcen, wie, z.B., Handles.

Ausserdem finde ich es gefährlich, dass Du für Networking einen var-Parameter verwendest, da Du ja schon ein erzeugtes Objekt übergibst, und es nicht erst in Networking erzeugst.
Mit var läufst Du Gefahr in der Prozedur den Pointer im Parameter mit etwas anderem zu überschreiben, und so ein Speicherleck zu erzeugen.
Deklariere den mal lieber als const. Eigenschaften ändern usw. kannst Du trotzdem.

Zudem ist es bei Funktionen, die Erfolg und Misserfolg melden (z.B. CopyFile, DeleteFile) den Rückgabewert zu prüfen.
Du gibst OK zurück, weisst aber gar nicht, ob CopyFile erfolgreich war.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat