TObjectList

[twityzuz]

Zitat von DeddyH:

Unit Contnrs und einfach TObjectList.

Was möchten mir diese weisen Worte sagen?
Ich weiß, dass mag für euch alle jetzt ziemlich dumm rüberkommen, aber ich kann euch einfach nicht folgen. Ich programmiere noch nicht so lange, hinzu kommt, dass ich auch ziemlich unter Druck stehe, weil ich das Programm bald abgeben muss...

[stahli]

Statt "Generics..." einfach "Contnrs" verwenden.

Die Unit Generics... ist erst in den aktuellen Delphi-Versionen verfügar. Da sind quasi die Komponenten mit den Spitzen Klammern drin definiert (ähh, na ja, so ähnlich jedenfalls...). Also Generics... und spitze Klammern musst Du weg lassen und dafür die Unit Contnrs verwenden.

[DeddyH]

Sinnfreier Beispielcode:

Delphi-Quellcode:

uses Windows, SysUtils, {usw.} Contnrs;

...

var 
  Liste: TObjectList;
  i: integer;
  EineKlasse: TEineKlasse;
begin
  Liste := TObjectList.Create;
  try
    for i := 0 to 9 do
      begin
        EineKlasse := TEineKlasse.Create;
        EineKlasse.Bla := Blubb;
        Liste.Add(EineKlasse);
      end;
  finally
    Liste.Free;
  end;
end;

[twityzuz]

@DeddyH: Das verstehe ich leider nicht

Jetzt habe ich die ObjectList schonmal. Jetzt die Frage: Wie kann ich Objekte reinladen (ich will euch ja nicht auf die nerven gehen, aber es wäre cool, wenn ihr es für BLÖDE erklären könntet)

[DeddyH]

Das habe ich doch gerade gezeigt. Objektliste erstellen, Objekt erstellen und mit TObjectList.Add() der Liste hinzufügen.

[twityzuz]

MyList.Add(BitBtn47); So habe ich das jetzt gemacht, dann kommt eine Fehlermeldung von Windows:

Zitat:

Zugriffsverletzung bei Adresse 004133DF in Modul 'Project2.exe'. Lesen von Adresse 00000008.

Was jetzt?

[jaenicke]

Du hast MyList nicht erstellt bevor du es verwendet hast.

[DeddyH]

Wenn es einen Moment Zeit hat: ich schreibe gerade ein kleines Beispielprogramm in Delphi 7.

[twityzuz]

Jetzt funktionierts; Aber wie benutze ich das Teil jetzt? Also mit Index und so?

[stahli]

Trotz rotem Kasten, wegen der vielen Mühe...

Sieht so aus, als ob Du Deine Liste zwar definiert aber nicht instanziiert (erzeugt) hast.

Setze einen Haltepunkt in Deine Zeile und sieh Dir MyList an. Wird vermutlich NIL sein.

Du musst Deiner List-Variablen vorher noch eine Liste zuweisen: MyList := TObjectList.Create; Jetzt kannst Du mit "der Liste" (besser gesagt mit dem Objekt der Klasse "TObjectList", das in der Variable MyList zugeweisen ist) arbeiten.
Im Spachgebrauch sagt man nun, MyList ist eine Liste. Ihr muss aber zuvor ein Instanz einer List (das was mit Create irgendwo im Hauptspeicher erzeugt wird) zugewiesen werden. Vorher ist NIL (also nichts) zugewiesen und man kann die Liste nicht benutzen.