array[1..10] auf Wert prüfen?

[hoika]

Hallo,
so aus dem Stegreif

Delphi-Quellcode:

function GibMirEinenString(const AFlag: Integer): String;
begin
  Result:= '';  // ja, die Zeile ist wirklich drin 

  case AFlag of
    1: Result:= '1';
    2: Result:= '2';
  else
  begin
    if AFlag>100 then
    begin
      Result:= 'zu gross';
    end
    else
    begin
      Result:= '>2';  // hier kam die Compilerwarnung
    end;
  end;
end;

Die Methode hatte >500 Zeilen ...

[Neutral General]

Dabei kommt keine Warnung, das muss anders ausgesehen haben. (Habs extra getestet)

[himitsu]

Zitat von Neutral General:

Dabei kommt keine Warnung, das muss anders ausgesehen haben. (Habs extra getestet)

Es fehlt ein END, das vom CASE, wenn ich das letzte END der Funktion zuschreibe.

Und ich würde wenigstens eine Meldung beim ersten Result := '' erwartet. (wurde zugewiesen aber nicht verwendet)


Ansonsten ist hier der String (gemanagte Typ) ein Problem, der per se immer initialisiert ist, entgegen einem Integer-Result.
Nur ist der eben extern initialisiert und das kann probleme geben, wenn der String wiederverwendet oder in einer Schleife genutzt wird.