Programm stürzt bei "end;" ab

[himitsu]

warum der abstürzt?

also erstmal hättest du gleich von Anfang an sagen können, wie man den Fehler produziert, wenn es nicht von alleine geschieht.

und dann wäre es schön gewesen, wenn du auch sagst wo der Fehler auftritt.
(wir können ja nicht bei Jedem hier im Forum auf die Suche gehn, nur weil nichts beschrieben ist ... wir haben doch nicht unendlich Zeit)


du löschst alle Labels

Delphi-Quellcode:

procedure TfrmMain.Refresh;
  ...
  For J := 1 to NrLabels do
    TLabel(FindComponent('Knot' + IntToStr(J))).Free;

und dann ist es doch kein Wunder, wenn er abstürzt, sobald er zu dem Label zurück will, von wo aus der Aufruf gestartet wurde.

Delphi-Quellcode:

procedure TfrmMain.LabelClick(Sender: TObject);
begin
  Refresh;
end; <<<<<<< der Absturz

wenn ich dir jedesmal das Haus unter den Füßen wegzieh, sobald du ein anderes Zimmer betrittst, dann stürzt du auch ab ... da isses egal, ob ich das Haus gleich wieder neu Aufbaue ... wobei hier das Haus (also das Label) sogar noch an einer anderen Stelle (wo anders im Speicher) neu aufgebaut wird.