type TIFPSPreProcessor = class(TObject)
![]() |
constructor Create; |
![]() |
destructor Destroy; override; |
![]() |
procedure AdjustMessages(Comp: TIFPSPascalCompiler); |
![]() |
procedure Clear; |
![]() |
procedure PreProcess(const Filename: string; var Output: string); |
![]() |
constructor Create; |
![]() |
destructor Destroy; override; |
![]() |
procedure AdjustMessages(Comp: TIFPSPascalCompiler); |
Adjust the message in IFPS3 so they will contain the modulename and all the positions will match their real positions, make sure that you call this after you compile any script (but only once)
![]() |
procedure Clear; |
Clear everything
![]() |
procedure PreProcess(const Filename: string; var Output: string); |
Call the preprocessor, filename contains the current file, if FileName is MainFileName (case sensitive) it will no call the OnNeedFile event. the preprocessor will raise an exception on any errors
![]() |
property CurrentLineInfo: TIFPSLineInfoList; |
![]() |
property Defines: TStringList; |
![]() |
property ID: Pointer; |
![]() |
property MainFile: string; |
![]() |
property MainFileName: string; |
![]() |
property MaxLevel: Longint; |
![]() |
property OnNeedFile: TIFPSOnNeedFile; |
![]() |
property CurrentLineInfo: TIFPSLineInfoList; |
Current line information
![]() |
property Defines: TStringList; |
Defines for the parser
![]() |
property ID: Pointer; |
Id Pointer, not used by the preprocessor
![]() |
property MainFile: string; |
The contents of the "main" file
![]() |
property MainFileName: string; |
The filename of the MainFile
![]() |
property MaxLevel: Longint; |
The maximum number of levels deep the parser will go, defaults to 20
![]() |
property OnNeedFile: TIFPSOnNeedFile; |
OnNeedFile event, is called when the parser needs a file