Objekt TList- ich versteh kein Wort!

[ark4869]

Du wirst es nicht glauben, aber das mit dem Vernichten versteh ich jetzt
Die Fehlermeldungen sind aber halt trotzdem da.


Und danke für den Seitenhieb- früher war ich mal gut in Informatik ...


Oh Mann bin ich doof, natürlich sollt ich die Buttons auch aus dem Formular nehmen wenn ich sie ausklammer. Kein Wunder dass die Fehlermeldung kam^^ Aber Erzeugen geht trotzdem noch nicht

Bah! Das mit Create hat ich am Anfang aber dann durhc neustart des Projektes hab ichs vergessen! Das create steht auch im Buch. Boah ey sowas vergessen, das versteh ich ja sogar noch



Edith: Also, nach ein paar dummen Fehlern funktioniert jetzt auch vernichten, aber der löscht alles auf einmal(und aufgrund vorherigen fehlern hatte ich mir n Label eingerichtet, dass mir auf Klick die count angibt, das zeigt mir dann 0 an). D.h. ma gucken #

Zweite Edith: Geeeeil! Ich habs alleine geschafft!!! Wie coooool! Ich liebe dieses Gefühl, etwas selbst zu schaffen(auch wenn ich den Rest ohne deine Hilfe wohl nicht hinbekommen hätte

Hier die Vernichten-PRozedur

Delphi-Quellcode:

procedure TMain.BtVernichtenClick(Sender: TObject);
var i: integer;
begin
  i := Liste.Count - 1  ;
  if Liste.Items[ i ] <> nil then
    begin
      TBewegteUhr( Liste.Items[ i ] ).Loeschen;
      Liste.Delete( i );
    end;
end;

Jetzt darf das ding nur nicht abstürzen wenn keine Uhr mehr da ist.