Einzelnen Beitrag anzeigen

herkulesamstart

Registriert seit: 17. Jun 2005
36 Beiträge
 
#1

Problem: Units definieren sich gegenseitig...

  Alt 15. Nov 2007, 15:57
Hallo,

ich hab ein Problem beim einbinden meiner Unit (Stack) ins Hauptprogramm. Das Problem liegt darin, dass sie gegenseitig informationen austauschen sollen. In meiner Haupt-Unit soll definiert werden um welchen Typ von Info es sich in meinem Stack handel soll und in der der anderen wird der Stack selber definiert, der dann später in der main-unit auch genutzt werden soll.
Nun weiss meine Stack-Unit allerdings nicht um welchen Typ von info es geht, da ich die Unit ja vor der Typisierung einbinden muss oder nicht?

Ich weiss, dass ich das Problem umgehen kann, indem ich Tinfo in der Stack-Unit Typisiere bzw dort einfach deklariere, allerdings möchte ich eine etwas flexiblere Nutzung der Stack-Unit für mich gewinnen. Ich möchte nicht erst vor Gebrauch der Unit diese selber umschreiben müssen, sondern einfach den Typen definieren.

Delphi-Quellcode:
unit main;

interface

USES stack;

TYPE
  Tinfo = Integer;
  //Tinfo = String;

VAR
  st1 :Tstack;
implementation

end.
Delphi-Quellcode:
unit stack;

interface

TYPE tstack = RECORD
                 info : ARRAY OF tinfo;
                 next : integer;
               END;

implementation
end.
Gruß herkulesamstart
  Mit Zitat antworten Zitat