Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi Borland Pascal 7: Freigeben von Objekten

**d3g**

Hi Leute,

kann mir jemand von euch Nachhilfeunterricht in OOP mit Turbo Pascal geben (als ich mit TP programmiert habe, war OOP für mich noch ein Fremdwort...).

Ich habe folgenden Code:

markieren

Code:

			[b]type[/b]

  TWareListItem = [b]object[/b]

    [b]public[/b]

      [b]constructor[/b] Create(next: ^TWareListItem);

      [b]destructor[/b] Destroy;

      [b]procedure[/b] SetNext(next: ^TWareListItem);

      [b]function[/b] GetWare: TWare;

    [b]private[/b]

      nextItem: ^TWareListItem;

      ware: TWare;

  [b]end[/b];

Ich kann kein Objekt von TObject ableiten (weil es kein TObject gibt), nun weiß ich aber nicht, wie ich im Destruktor dn Speicher für mein Objekt freigeben soll... Kann mir jemand helfen?

Danke im Voraus,
d3g