ParamStr komplette Verzeichnisse auswählen

[Sir Rufo]

Zitat von p80286:

@sirRufo Was will uns der Dichter damit sagen?

Das war eine Antwort auf die Beiträge:

Zitat von mm1256:

Zu deinem Code. Schau dir auch nochmal den Try..Finally-Block an. Wenn du zwei constructoren aufrufst, dann solltest du diese besser innerhalb des try aufrufen.

Delphi-Quellcode:

try
  frReport := TfrReport.Create(NIL);
  PDFExport := TPsfrPDFExport.Create(NIL);
finylly
  PDFExport.Free;
  frReport.Free;
end;

Hintergrund: Wenn einer der beiden constructoren fehlschlägt, wird in jedem Fall mit Free wieder richtig aufgeräumt, weil Free auf "nil" prüft, und somit auch keine Exception wirft, wenn eine der beiden Instanzen nil ist.

und

Zitat von Der schöne Günther:

Zitat von mm1256:

Hintergrund: Wenn einer der beiden constructoren fehlschlägt, wird in jedem Fall mit Free wieder richtig aufgeräumt, weil Free auf "nil" prüft, und somit auch keine Exception wirft, wenn eine der beiden Instanzen nil ist.

Die Absicht ist richtig (Konstruktor vor dem try..finally-Block), die Begründung aber nicht

Wenn im Konstruktor eine Exception auftritt
- Wird der Destruktor ausgeführt
- Und die Exception anschließend weiter geworfen
- In den try..finally-Block kommt man somit erst gar nicht.


(Deshalb ist Free() sogar eigentlich unnötig da im try..finally-Block die Referenz niemals nil sein kann, ein Destroy() reicht völlig)

Denn zum echten Schutz vor einem MemLeak müsste es so lauten

Delphi-Quellcode:

frReport := nil;
PDFExport := nil;
try
  frReport := TfrReport.Create(NIL);
  PDFExport := TPsfrPDFExport.Create(NIL);
finally
  PDFExport.Free;
  frReport.Free;
end;

[mm1256]

Ja genau, um diese Vereinfachung geht es.

@Sir Rufo, ich sehe wir sind uns einig was den try..finally anbelangt. Wo ich mir nicht ganz sicher bin, warum

Delphi-Quellcode:

frReport := nil;
PDFExport := nil;

Vorsichtsmaßnahme, oder Pflichtübung. Wenn Pflichtübung, warum? Meine Ansicht bzw. Wissensstand: Es sind lokale Instanzen und darum müsste doch die nil-Zuweisung eigentlich nicht erforderlich sein. Anders sieht es aus, wenn es globale oder Formvariablen sind, weil dann der Zeiger auf irgendwas zeigen kann, was vorher schon mal in Benutzung war und noch nicht überschrieben ist.

[Sir Rufo]

Zitat von mm1256:

@Sir Rufo, ich sehe wir sind uns einig was den try..finally anbelangt. Wo ich mir nicht ganz sicher bin, warum

Delphi-Quellcode:

frReport := nil;
PDFExport := nil;

Vorsichtsmaßnahme, oder Pflichtübung. Wenn Pflichtübung, warum? Meine Ansicht bzw. Wissensstand: Es sind lokale Instanzen und darum müsste doch die nil-Zuweisung eigentlich nicht erforderlich sein. Anders sieht es aus, wenn es globale oder Formvariablen sind, weil dann der Zeiger auf irgendwas zeigen kann, was vorher schon mal in Benutzung war und noch nicht überschrieben ist.

Das liegt daran, dass lokale Variablen nicht automatisch initialisiert werden. Da kann sonst was drin stehen ...

Wenn ich also sicher gehen will, das dort der Wert xy drin steht, dann muss ich diesen Wert aktiv zuweisen.

[mm1256]

Zitat von Sir Rufo:

Das liegt daran, dass lokale Variablen nicht automatisch initialisiert werden. Da kann sonst was drin stehen ...

Wenn ich also sicher gehen will, das dort der Wert xy drin steht, dann muss ich diesen Wert aktiv zuweisen.

Danke, wieder was gelernt...und natürlich auch überprüft. Stimmt

[DeddyH]

Hier hatte ich das auch schon einmal durchexerziert: http://forum.delphi-treff.de/index.p...verschachteln/