Wo soll bitte das FindClose(SR) stehen

[dummzeuch]

Zitat von ter:

Frage:
Wo sollte das "FindClose(SR)" stehen?
An Stelle (1) oder Stelle (2)?

Delphi-Quellcode:

    if (FindFirst(myDP+'*.*', faANYFILE, SR) = 0) then begin
       repeat
       until (FindNext(SR) <> 0);
       {-1-} FindClose(SR);
    end;
    {-2-} FindClose(SR);

FindClose gibt die Ressourcen frei, die ein erfolgreiches FindFirst belegt hat. D.h. ein nicht erfolgreiches FindFirst belegt keine Ressourcen, die freigegeben werden muessen.

-> Stelle 1

Und wie Schokohase schon schreibt: Am besten mit Try .. Finally.