delphi10.4で下記のResultが使われてないって出るんだけど

function TForm1.Test:Boolean;
var
 s : string;
 iTest : Integer;
begin
 result := False;    // ←この代入が使われてないと出る
 iTest := 0;
 try
  s := IntToStr(10 div iTest); //ゼロ除算エラー発生
  result := True;
 finally
  ;
 end;
end;

昔からだっけ?