Zumindest diese Fehlermeldung kommt jetzt nicht mehr. Danke schön.
Aber ich komm echt immer noch nicht klar. Weiß nicht wie ich das Vernichten machen soll, weiß einfach garnichts echt. Ich hab nicht mal Ansatz. Doch den hab ich, aber keine Ahnung ...
Delphi-Quellcode:
procedure TMain.BtVernichtenClick(Sender: TObject);
begin
if TBewegteUhr(Liste.Items[posi]) <> nil then begin
TBewegteUhr(Liste.Items[posi]).Destroy;
TBewegteUhr(Liste.Items[posi]):= nil;
Liste.Delete(Liste.Items[posi]);
end;
end;
Hab die Variable global als posi dekliniert.
Bei dem Nil teil sagt er schon, der linken Seite kann nix zu gewiesen werden, und ich verzweifel hier.