Einzelnen Beitrag anzeigen

Benutzerbild von Aenogym
Aenogym

Registriert seit: 7. Mär 2004
Ort: Schwerin
1.089 Beiträge
 
Delphi 7 Enterprise
 
#13

Re: Überkreuzender Bezug zweier Units

  Alt 29. Dez 2004, 10:43
Zitat von Pseudemys Nelsoni:
wie mach ich das denn mit einer dritten unit?
hi,

ich würd mal sagen, so:

Delphi-Quellcode:
{ myClasses - beihnaltet die klassen, ... }
unit myClasses;

interface

type
  TBlah = class(TObject)
    blah: blah;
  end;

implementation
//...............

Delphi-Quellcode:
{ unitA - benutzt erste unit }
unit unitA;

interface

uses windows, ....., myClasses;

type
  T.......
  end;

var
  blah1: TBlah;

implementation
//...............
Delphi-Quellcode:
{ unitB - benutzt auch die erste unit }
unit unitB;

interface

uses windows, ....., myClasses;

type
  T.......
  end;

var
  blah2: TBlah;

implementation
//...............
grüße,
Aenogym
Steffen Rieke
Was nicht buzzt, wird buzzend gemacht!
http://blog.base-records.de
http://www.base-records.de
  Mit Zitat antworten Zitat