moin,
Delphi-Quellcode:
procedure blubb(b: boolean);
begin
case b of
true:
if irgendwas then
begin
DoSomething();
DoSomething();
DoSomething();
DoSomething();
DoSomething();
DoSomething();
DoSomething();
DoSomething();
end;
false:
if sonstwas then
begin
DoSomething();
DoSomething();
DoSomething();
DoSomething();
DoSomething();
DoSomething();
DoSomething();
DoSomething();
end;
end;
end;
die 2 case teile unterscheiden sich NUR von der if abfrage, kann ich den code nicht irgendwie kleiner machen? die prozeduren innerhalb der cases sind 100% gleich