NotifyWindow, dynamisches Fenster in nur einer Prozedur inklusive Events und AA

[Sir Rufo]

Dein Exception-Handling ist schon etwas paranoid

Delphi-Quellcode:

procedure foo;
begin
  try
    ...
  except
    ...
    Exit; // kann ersatzlos gestrichen werden, wenn nichts mehr danach kommt
  end;
end;

Das mit dem Errorlog ist bestimmt gut gemeint, aber nicht gut gemacht. Man weiß, dass etwas schief gelaufen ist, aber was?

Delphi-Quellcode:

try
  ...
except
  on e: Exception do
  begin
    Errorlog( Format( 'Da ging was in die Hose, wegen %s: %s', [e.ClassName, e.Message] ) );
    // ich würde hier noch ein
    raise;
    // aufrufen, damit ich im Programm auf diesen Fehler reagieren kann (nicht muss)
  end;
end;

Generell sind Exceptions nicht der Feind, den es um jeden Preis zu unterdrücken gilt.

Man stelle sich einmal vor, der Compiler wäre nach diesem Muster aufgebaut:

Zitat:

Da ist watt falsch in dem Code! Kann ich nicht compilieren.

Wäre nicht sehr hilfreich