Was nervt euch so, während der Programmierung oder so allgemein

[rollstuhlfahrer]

was mich bei einem Projekt genervt hat, ist, dass Delphi/Pascal zwar die Fähigkeit von goto bietet, man diese aber nicht nutzen soll. da kommen dann Strukturen wie folgende raus:

Delphi-Quellcode:

  // Anti-GOTO-Struktur
  if ScanRows then
  begin
    if ScanCols then
    begin
      if ScanFields then
      begin
        Result := true;
      end
      else
      begin
        Result := false;
      end;
    end
    else
    begin
      Result := false;
    end;
  end
  else
  begin
    Result := false;
  end;

Mit einem einfachen goto wäre das viel einfacher gegangen. Und auch viel leserlicher und schöner:

Delphi-Quellcode:

  
procedure MitGoto();
// ...
begin
  //GOTO-Struktur
  if not ScanRows then
  begin
    Result := false;
    goto ende;
  end;

  if not ScanCols then
  begin
    Result := false;
    goto ende;
  end;

  if ScanFields then
  begin
    Result := false;
    goto ende;
  end;

  :ende
end;

Bernhard

PS: Nach mehrfachem Umbau sieht der Ablauf völlig anders aus und man braucht auch kein Goto mehr.