Delphi 7: declaracao forward class

Sumerset

Power Member
Olá,

Estou neste momento a fazer 5 componentes para delphi.

Acontece que estes componentes estão interligados e estou a ter um erro do compilador que diz "circular unit reference".


Basicamente dentro de cada componente necessito de fazer referencia aos restantes 4 componentes e aceder a propriedades que estão dentro destas.

tenho algo parecido com isto:

Código:
unit unitA

uses unitB

type
TclasseA = class(tcomponent)
private
classeB: TclasseB;
end;

Código:
unit unitB

uses unitA

type
TclasseB = class(tcomponent)
private
classeA: TclasseA;
end;


Alguem me pode dizer como resolver este tipo de problema?
 
Última edição:
Back
Topo