Hallo,
die Compilermeldung ist doch eindeutig.
Da für den Compiler auf jeden Fall
Result:= True aufgerufen wird, die
Exception könnte kommen, muss aber nicht.
Delphi-Quellcode:
function TMainDlg.TestFunktion: Boolean;
begin
Result := False;
//<-- hier kommt die Meldung.
try
//Hier steht Code, der eine Exception auslösen könnte. Dadurch wird das Result unten nur zugeweisen, wenn es keine Exception gibt. Ansonsten müsste doch das obere Result benutzt werden. Was ja laut Compilier angeblich nie benutzt wird.
Result := true;
except
//...
end;
end;
Oder wenn except und finally
Delphi-Quellcode:
function TMainDlg.TestFunktion: Boolean;
var
StrList: TStringList;
begin
Result := False; //<-- hier kommt die Meldung.
try
StrList:= TStringList.Create;
try
finally
StrList.Free;
end;
Result := true;
except
//...
end;
end;
Heiko