Aufzählungstyp definieren als "verweis" auf andere Unit

[Bernhard Geyer]

Mit Folgenden Konstrukt

Delphi-Quellcode:

unit MyHeaderUnit

interface

uses
  UnitOfClass;

type
  TMyClass= UnitOfClass.TMyClass;

kann ich in der Klasse in Unit MyHeaderUnit so definieren das die eigentliche Implementierung/Definiton von Unit "UnitOfClass" verwendet wird. Damit kann ich erreichen das ich nur die Unit "MyHeaderUnit" in all meinen anderen Units aufnehmen muß und die Querwuchs der Units zu verringen (Vor allem einfacher zu pflegen ist falls mal die "Basisklasse" in eine andere Unit wandert.

Was kann/muß ich machen um einen Aufzählungstyp auf gleicher weise zu definieren. Eine definition der Art

  TEnumTyp = UnitOfEnum.TEnumTyp; reicht leider nicht aus das die Enumwerte damit nicht bekannt sind wenn eine andere Unit "UnitOfClass" used.

[Hawkeye219]

Hallo Bernhard,

du wirst wohl oder übel alle Konstanten erneut definieren müssen:

Delphi-Quellcode:

const
  enumConst1 = UnitOfEnum.enumConst1;
  enumConst2 = UnitOfEnum.enumConst2;
  ...

Eine andere Möglichkeit ist mir nicht bekannt.

Gruß Hawkeye