Abstrakter Fehler

[MiChiJong]

Also meiner Meinung nach tritt der Fehler nach loeschenTeilnehmer auf.

Jedoch frage ich mich wo der Fehler dann auftritt. Denn lschenTeilnehmer wird ja von LoeschenClick aufgerufen und danach wird nur noch der zaehler um 1 erniedrigt.

Delphi-Quellcode:

procedure TForm1.LoeschenClick(Sender: TObject);
var
tempzahl: String;
begin
if Sender is TButton then
   tempzahl:=TButton(Sender).Name;
   Delete(tempzahl,0,8);
   tempzahl:=Copy(tempzahl,9,2);
   loeschenTeilnehmer(tempzahl);
   zaehler:=zaehler-1;
end;