TClassDeclaration = class(TBlockDeclaration)
Name |
Type |
Visibility |
Synopsis |
constructor |
public |
|
|
destructor |
public |
|
|
field |
protected |
An array of TBasicDeclarations. |
|
field |
protected |
|
|
function |
protected |
Retruns true if self implements int. |
|
procedure |
protected |
|
|
procedure |
protected |
|
|
|
constructor Create(adecl : TTextObject; aname : String; aancestors, ainterfaces : TStrings; avisibility : String; avisibilitytype : TVisibilityType; asymboltype : String; alinenum : Cardinal; acomment : TComment; asection : TSection; aparentDecl : TBlockDeclaration);
destructor Destroy; override;
Interfaces : TArrayAdt;
UnrecognizedInterfaces : TStrings;
function ImplementsInterface(int : TBasicDeclaration) : Boolean;
procedure PushAncestorsAtFront(deque : TDequeAdt); override;
procedure WriteHead; override;