Hallo,
Eine Reihe von Jobs (Namen kommen aus einer Stringlist "Jobs" sollen hintereinander ausgeführt werden. Wenn da bei einem was falsch läuft, soll der Rest trotzdem gemacht werden, das Gesamtergebnis der Funktion soll aber false zurückliefern, wenn mind. ein Job einen Fehler hatte.
Die folgende Konstruktion müsste das doch machen oder?
Delphi-Quellcode:
function TJoblist.ExecuteJobs:Boolean;
var i:Integer;
j:TJob;
begin
Result:=true;
for i:=0 to Jobs.Count-1 do
begin
j:=JobFactory.GetJob(Jobs[i]);
Result:=j.Execute And Result;
//Result:=Result And j.Execute; //So gehts nichtmehr nachdem einer false war
if Assigned(fProgress) then fProgress;
end;
j:=nil;
end;
Ist die letzte Zuweisung j:=nil nötig/sinnvoll? Der Compliler sagt sowas ala j wird nie verwendet. Könnte man dass daher auch weglassen, da die Funktion ja danach zuende ist?
Die Job-Objekte werden später innerhalb der Factory-Klasse freigegeben, wenn diese selbst freigegeben wird.