hoi wie kann ich folgendes verbessern?
Delphi-Quellcode:
procedure proc;
var
b: boolean;
begin
if bedingung1 then
begin
anweisung;
b := true;
end;
if bedingung2 then
begin
anweisung;
b := true;
end;
if bedingung3 then
begin
anweisung;
b := true;
end;
if bedingung4 then
begin
anweisung;
b := true;
end;
if bedingung5 then
begin
anweisung;
b := true;
end;
if not b then
begin
// hier gehts normal weiter
end;
end;
wenn irgendeine dieser if abfragen zutrifft dann soll "b" true werden, muss ich das ich jeder abfrage drin haben? oder gibts ein "else" das sich auf ALLE vorigen if anweisungen bezieht? würde ich das "B:= true" nicht überall drin haben müssen, würde meine procedur schon viel kleiner und übersichtlicher werden, ca so:
Delphi-Quellcode:
procedure proc;
var
b: boolean;
begin
if bedingung1 then
anweisung;
if bedingung2 then
anweisung;
if bedingung3 then
anweisung;
if bedingung4 then
anweisung;
if bedingung5 then
anweisung;
else b := false // ??
if not b then
begin
// hier gehts normal weiter
end;
end;
ich könnte mir die ganzen begin..end's sparen
jemand ne idee?
wäre "else if" ne lösung?