Warnung des Compilers verstehen

[Corpsman]

hmm ich komm da nu nich ganz mit.

Ich habe es mal durch meinen Codeformater gejagt und von meinem Compiler Compilieren lassen.

Delphi-Quellcode:

Function 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;

Und ich habe weder Warnung noch sonst was bekommen.

Welche Delphi ver hast du denn da zum Kompilieren genutzt ?
( Meine war D5 Prof )