"Auf X zugewiesener Wert wird niemals benutzt" beheben

[mkinzler]

Es gibt leider kein paralleles except und finally Versuch mal

Delphi-Quellcode:

function TMainDlg.TestFunktion: Boolean;
begin
  Result := False;
  try
    try
      //Hier steht Code, der eine Exception auslösen könnte. Dadurch wird das Result unten nur zugeweisen, wenn es keine Exception gibt.
    except
       on Exception do
           Result := true; //<-- hier kommt die Meldung.
    end;
  finally
    //Hier steht was, was immer ausgeführt werden muss
  end;
end;