Schleifenabbruch durch exception verhindern

[Dejan Vu]

Lustig, das Niemand was an diesem 1000 Zeilen Monstrum auszusetzen hat.

Mein Tipp wäre: Anstatt den Fehler fürs Erste zu ignorieren, und für 'try...finally...except..end' (oder umgekehrt) zu voten, oder mit anderen Nice-To-Have-Features zu liebäugeln, würde ich mal das Refaktoring-Beil herauskramen.

Deine Klasse ist zu komplex und das hast du nun davon.

Delegiere Teile der Funktionen deiner Klasse in andere (neue) Klassen.
Gruppiere Methoden in deiner Riesenklasse, die gemeinsame private Variablen verwenden und lagere sie aus.
Wenn eine Methode viele andere Methoden aufruft, wäre das auch ein Kandidat für eine eigene Klasse.

Dabei räumst Du auf und vielleicht findest Du den Fehler dann. Wenn nicht, dann prüfe einfach die einzelnen Methoden und schreibe Unittests.

[himitsu]

Über die 1000 Zeilen hatte man sich bereits auf Seite 1 aufgeregt.

Als bekennender "Keine unnötigen Klammern oder Begin-End und Bedin-End in selber Zeile"-Fetischist kann ich das Problem nicht erkennen.

Delphi-Quellcode:

if Bedingung1 then
  ...
else if Bedingung2 then
  ...
else if Bedingung3 then
  ...
else
  ...;

if Bedingung1 then begin
  ...
end else begin
  ...
end;

[Uwe Raabe]

Zitat von Dejan Vu:

Lustig, das Niemand was an diesem 1000 Zeilen Monstrum auszusetzen hat.

Natürlich wäre das der korrekte Ansatz. Allerdings steht ausdrücklich im ersten Post:

Zitat von bernhard_LA:

Technisch bekomme ich dieses Problem nicht schnell gelöst.

Ich gehe also davon aus, daß dieser (obwohl bessere) Weg hier aus Zeitgründen nicht eingeschlagen werden kann oder soll.

[Dejan Vu]

Ich glaube, das man hier vor lauter Wald den Baum nicht sieht. Bugs in so einem Klassenmonstrum kann man i.A. "technisch nicht schnell" lösen.

Da ich aber auch darauf poche, den Eingangspost zu lesen und den TE ernst zu nehmen, muss das akzeptieren. Danke für den Hinweis.