Thema: FreePascal for-Schleife -Abbruch

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#14

AW: for-Schleife -Abbruch

  Alt 16. Nov 2011, 00:05
Bei dem genannten Beispiel ist das halt kürzer und ein Exit ist unnötig, da vor/nach den Exit's nur das booleanische Result gesetzt wird ... also kann man die Ifbedingungen auch direkt an das Result weitergeben.
Delphi-Quellcode:
// man schreibt ja auch
Result := irgendwas;

// und nicht
if irgendwas then
  Result := True
else
  Result := False;

// oder
Result := False;
if irgendwas then
  Result := True;

// oder eben das genannte
Result := False;
if not irgendwas then
  Exit;
Result := True;
also demnach so
Delphi-Quellcode:
function OperationIstLegal(KandidatenIndex: Integer): Boolean;
begin
  Result := not KandidatIstLeer(KandidatenIndex)
    and KandidatIstNumerisch(KandidatenIndex)
    and not (KandidatHatRoteHaare(KandidatenIndex) and HeuteIstDienstag);
end;
$2B or not $2B
  Mit Zitat antworten Zitat