System.Collections in Delphi32 einbinden

**GroHae**

Hallo zusammen,

wenn ich delphi mir z.B. das Composite Muster erstellen lasse, erzeugt er mir diesen Code:

Delphi-Quellcode:

			interface

uses System.Collections;   // Fehler // Das ist wohl .NET

type

  TSpeisenkarteKomponente = class abstract

  public

    procedure SampleOperation(i :Integer);virtual;abstract;

    procedure Add(AComponent :TSpeisenkarteKomponente);virtual;

    procedure Remove(AComponent :TSpeisenkarteKomponente);virtual;

    function Components: IEnumerator;virtual;  // Fehler

    function GetName: string;

  end;

  TSpeisekarte = class(TSpeisenkarteKomponente)

  strict private var

    ///<associates>TComponent</associates>

    ///  <link>aggregation</link>

    ///  <supplierCardinality>0..*</supplierCardinality>

    FComponentList:ArrayList; // Fehler

  public

    constructor Create;

    procedure SampleOperation(i :Integer);override;

    procedure Add(AComponent :TSpeisenkarteKomponente);override;

    procedure Remove(AComponent :TSpeisenkarteKomponente);override;

    function Components: IEnumerator;override;  // Fehler

  end;

  TSpeise = class(TSpeisenkarteKomponente)

  public

    procedure SampleOperation(i :Integer);override;

    function GetName: string;

  end;

So cann ich das nicht kompelieren, da System.Collections anmeckert und dann natürlich IEnumerator und ArrayList nicht kennt.

Wie kann ich System.Collections einbinden?

System.Collections in Delphi32 einbinden

System.Collections in Delphi32 einbinden

Forumregeln