Unit 'uPSUtils'	Package
[Overview][Constants][Types][Classes][Procedures and functions][Index]	[#pl_pascalscript]

TPSPascalParser

Declaration

Source position: uPSUtils.pas line 563

`type TPSPascalParser = class(TObject)`
`protected`
`FData: TbtString;`
`FText: PChar;`
`FLastEnterPos: Cardinal;`
`FRow: Cardinal;`
`FRealPosition: Cardinal;`
`FTokenLength: Cardinal;`
`FTokenId: TPSPasToken;`
`FToken: TbtString;`
`FOriginalToken: TbtString;`
`FParserError: TPSParserErrorEvent;`
`FEnableComments: Boolean;`
`FEnableWhitespaces: Boolean;`
`function GetCol;`
`public`
`property EnableComments: Boolean; [rw]`
`property EnableWhitespaces: Boolean; [rw]`
`procedure Next; virtual;`
`property GetToken: TbtString; [r]`
`property OriginalToken: TbtString; [r]`
`property CurrTokenPos: Cardinal; [r]`
`property CurrTokenID: TPSPasToken; [r]`
`property Row: Cardinal; [r]`
`property Col: Cardinal; [r]`
`procedure SetText(); virtual;`
`property OnParserError: TPSParserErrorEvent; [rw]`
`end;`