Delphi: Valeur de retour peut être indéfini, malgré qu'elle a commencé après la mise en

Question

Quelqu'un peut-il me dire pourquoi je suis « valeur de retour ... peut-être pas défini » ici:

function TXMLAcceptorBCOLSubmission.createRecordsInBCFEEPAR(AXML: TRipXMLElement): String;
var
  ...
begin
  Result := '';

Answer 1

J'utilise Delphi 5 et il semble que le problème est causé en déclarant plus de 30 variables (je sais, je sais). Il ne semble pas question de ce qu'ils sont appelés ou quels types ils sont.

Answer 2

code suivant ne génère pas d'avertissement en utilisant Delphi 5 donc

• soit il est un bug dans une autre Delphi version (vous devez mentionner la version que vous utilisez)
• ou soit il est quelque chose que vous ne l'avez pas encore nous montrer.

code

program ProveAPoint;
{$APPTYPE CONSOLE}
uses SysUtils;

type
  TRipXMLElement = record
  end;
  TXMLAcceptorBCOLSubmission = class
  public
    function createRecordsInBCFEEPAR(AXML: TRipXMLElement): string;
  end;

function TXMLAcceptorBCOLSubmission.createRecordsInBCFEEPAR(AXML: TRipXMLElement): String;
begin
  Result := '';
end;

var
  AXML: TRipXMLElement;
begin
  with TXMLAcceptorBCOLSubmission.Create do
  begin
     createRecordsInBCFEEPAR(AXML);
     Free;
  end;
end.