| Class TUsesParser (unit Useparse) |
TObject
覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧
| Constructors |
constructor create;| Functions |
destructor destroy;
function LocateUsesStatement:boolean;
procedure ReadUsesStatement(UnitList:TstringList);
procedure WriteError(const Errmess:string);
procedure SetFileIn(const FileName:TFileName);| Properties |
property CurrentLineNo : integer
property FileName : TFileName| Events |
| Variables |
FCurrentLine : string;
FCurrentLineNo : integer;
FCurrentToken : string;
FFileIn : textfile;
FFileName : TFileName;
FParseState : eTParseState;| Constructors |
constructor create;覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧
| Functions |
destructor destroy;覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧
function LocateUsesStatement:boolean;ReadUsesStatement} {覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧
procedure ReadUsesStatement(UnitList:TstringList);of SetFileIn} {覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧
procedure WriteError(const Errmess:string);of LocateUsesStatement} {覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧
procedure SetFileIn(const FileName:TFileName);覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧覧
| Properties |
property CurrentLineNo : integer
property FileName : TFileName| Events |
| Variables |
FCurrentLine : string;
FCurrentLineNo : integer;
FCurrentToken : string;
FFileIn : textfile;
FFileName : TFileName;
FParseState : eTParseState;