Einzelnen Beitrag anzeigen

stifflersmom

Registriert seit: 8. Dez 2005
Ort: 24994 Holt
379 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#4

AW: case of "anstatt constanten - Variablen einsetzen

  Alt 8. Jul 2020, 17:47
Grundsätzlich finde ich mit "if ... then ... Exit(X);" zu arbeiten nicht verkehrt.

Also etwa:

Delphi-Quellcode:
function Check(const Value: Integer): Integer;
begin
  Result := -1;

  if InRange(Value, 0, 9) then
    Exit(1);
  if InRange(Value, 10, 19) then
    Exit(2);
end;
Das ist variabler als mit case und auch nicht unübersichtlicher.
Da bin ich ganz bei Dir.
Aber es müsste doch, in diesem Anwendungsfall, mit
Code:
Result := 208;
beginnen
  Mit Zitat antworten Zitat