Warnung des Compilers verstehen

[hsg]

Hallo Leute,

ich habe folgende Methode:

Delphi-Quellcode:

function TUser.Rechte(cModul: String) : string;
begin
  if AnsiCompareText(cModul,'Angebot') = 0 then         Result  := FAngebot
  else if AnsiCompareText(cModul,'Auftrag') = 0 then    Result  := FAuftrag
  else if AnsiCompareText(cModul,'AV') = 0 then         Result  := FAV
  else if AnsiCompareText(cModul,'Fertigung') = 0 then  Result  := FFertigung
  else if AnsiCompareText(cModul,'Einkauf') = 0 then    Result  := FEinkauf
  else if AnsiCompareText(cModul,'Versand') = 0 then    Result  := FVersand
  else if AnsiCompareText(cModul,'Reparatur') = 0 then  Result  := FReparatur
  else if AnsiCompareText(cModul,'Supply') = 0 then     Result  := FSupply
  else if AnsiCompareText(cModul,'Kunden') = 0 then     Result  := FKunden
  else if AnsiCompareText(cModul,'Artikel') = 0 then    Result  := FLager
  else if AnsiCompareText(cModul,'Projekt') = 0 then    Result  := FProjekt
  else if AnsiCompareText(cModul,'Zeichnung') = 0 then  Result  := FZeichnung
  else if AnsiCompareText(cModul,'Pruefmtl') = 0 then   Result  := FPruefmtl
  else if AnsiCompareText(cModul,'Iso9000') = 0 then    Result  := FIso9000
  else if AnsiCompareText(cModul,'System') = 0 then     Result  := FSystem
  else if AnsiCompareText(cModul,'Dokument') = 0 then   Result  := FDok
  else                                                  Result  := '';
end;

Beim Übersetzen meldet nun der Compiler "W1035 Rückgabewert der Funktion 'TUser.Rechte' könnte undefiniert sein"
Warum?
Auch ein Initialisieren von Result ändert nichts an der Meldung.

Irgendwelche Ideen?
Gruss Jörg