E2025 La procédure ne peut avoir un type de résultat (Delphi)

De RAD Studio
Aller à : navigation, rechercher

Remonter à Messages d'erreur et d'avertissement (Delphi)

Vous avez déclaré une procédure et donné un type pour le résultat. Soit vous vouliez réellement déclarer une fonction, soit supprimez le type du résultat.



program Produce;

procedure DotProduct(const A,B: array of Double): Double;
var
  I: Integer;
begin
  Result := 0.0;
  for I := 0 to High(A) do
    Result := Result + A[I]*B[I];
end;

const
  C: array [1..3] of Double = (1,2,3);

begin
  Writeln( DotProduct(C,C) );
end.

Ici DotProduct doit réellement être une fonction, nous venons juste d'utiliser le mauvais mot clé...



program Solve;

function DotProduct(const A,B: array of Double): Double;
var
  I: Integer;
begin
  Result := 0.0;
  for I := 0 to High(A) do
    Result := Result + A[I]*B[I];
end;

const
  C: array [1..3] of Double = (1,2,3);

begin
  Writeln( DotProduct(C,C) );
end.

Vérifiez simplement que vous spécifiez un type résultat lorsque vous déclarez une fonction, et aucun type résultat lorsque vous déclarez une procédure.