TDeclaration = class(TBasicDeclaration)
Name |
Type |
Visibility |
Synopsis |
constructor |
public |
acomment May be nil to indicate no comment. |
|
constructor |
public |
|
|
destructor |
public |
|
|
procedure |
public |
|
|
field |
protected |
|
|
field |
protected |
The text of the declaration. |
|
field |
protected |
Global, local, public, ... |
|
field |
protected |
|
|
field |
protected |
Read, write, ... |
|
field |
protected |
|
|
field |
protected |
|
|
field |
protected |
|
|
field |
protected |
|
|
procedure |
protected |
Writes out decls as links separating them with commas. |
|
procedure |
protected |
Writes a navigation panel. |
|
procedure |
protected |
Opens all requisite sections. |
|
procedure |
protected |
Writes the beginning of the declaration. |
|
procedure |
protected |
|
|
procedure |
protected |
Writes the closing part of the declaration (members + the navigation panel). |
|
|
constructor Create(adecl : TTextObject; asymbols : TStrings; avisibility : String; avisibilityType : TVisibilityType; asymboltype : String; alinenum : Cardinal; acomment : TComment; asection : TSection; aparentDecl : TBlockDeclaration);
constructor CreateSimple(anames : TStrings; asection : TSection; aparentDecl : TBlockDeclaration);
destructor Destroy; override;
procedure WriteOut; virtual;
SymbolType : String;
DeclText : TTextObject;
Visibility : String;
VisibilityType : TVisibilityType;
Accessibility : String;
FileName : String;
LineNum : Integer;
Comment : TComment;
Title : String;
procedure WriteLinks(decls : TArrayAdt; unrecognized : TStrings);
procedure WriteNavigationPanel;
procedure OpenSections;
procedure WriteHead; virtual;
procedure WriteMiddle; virtual;
procedure WriteTail; virtual;