TSyntaxType not found in new fast script version

unit CEIRADTool.Types;


interface


uses

 {FastScript}

 fs_SynMemo;


type

 TScriptType = record

  DefaultExtension: string;

  DisplayName: string;

  FileMask: string;

  FastScriptLanguageName: string;

  SyntaxType: TSyntaxType;

 end;


const

 cFastScriptLanguageName_PascalScript = 'PascalScript';


const

 cFileMask_AllFiles = '*.*';

 cFileMask_CPPScript = '*.cpp';

 cFileMask_JScript = '*.js';

 cFileMask_PascalScript = '*.pas';

 cFileMask_VBScript = '*.vb';


const

 cScriptTypes: array [0..4] of TScriptType = (

  (DefaultExtension: 'vb'; DisplayName: 'Visual Basic Script Files'; FileMask: cFileMask_VBScript; FastScriptLanguageName: 'BasicScript'; SyntaxType: stVB),

  (DefaultExtension: 'cpp'; DisplayName: 'C++ Script Files'; FileMask: cFileMask_CPPScript; FastScriptLanguageName: 'C++Script'; SyntaxType: stCpp),

  (DefaultExtension: 'js'; DisplayName: 'JScript Files'; FileMask: cFileMask_JScript; FastScriptLanguageName: 'JScript'; SyntaxType: stJs),

  (DefaultExtension: 'pas'; DisplayName: 'Pascal Script Files'; FileMask: cFileMask_PascalScript; FastScriptLanguageName: cFastScriptLanguageName_PascalScript; SyntaxType: stPascal),

  (DefaultExtension: 'N/A'; DisplayName: 'All Files'; FileMask: cFileMask_AllFiles; FastScriptLanguageName: 'N/A'; SyntaxType: stText)

  );


function StringToSyntaxType(const AString: string): TSyntaxType;


implementation


uses

 {Delphi}

 System.SysUtils,

 {CEI}

 CEI.Exceptions;


function StringToSyntaxType(const AString: string): TSyntaxType;

var

 AScriptType: TScriptType;

begin

 for AScriptType in cScriptTypes do

  if SameText(AString, AScriptType.FastScriptLanguageName) then

   Exit(AScriptType.SyntaxType);

 raise ECEIException.CreateFmt('Unexpected FastScript language name: "%s"', [AString]); //Do Not Localize

end;


end.



getting error in new fastscript version

[dcc32 Error] CEIRADTool.Types.pas(15): E2003 Undeclared identifier: 'TSyntaxType'

[dcc32 Error] CEIRADTool.Types.pas(30): E2003 Undeclared identifier: 'stVB'

[dcc32 Error] CEIRADTool.Types.pas(31): E2003 Undeclared identifier: 'stCpp'

[dcc32 Error] CEIRADTool.Types.pas(32): E2003 Undeclared identifier: 'stJs'

[dcc32 Error] CEIRADTool.Types.pas(33): E2003 Undeclared identifier: 'stPascal'

[dcc32 Error] CEIRADTool.Types.pas(34): E2003 Undeclared identifier: 'stText'

[dcc32 Error] CEIRADTool.Types.pas(37): E2005 'TSyntaxType' is not a type identifier

[dcc32 Error] CEIRADTool.Types.pas(47): E2005 'TSyntaxType' is not a type identifier

[dcc32 Fatal Error] CEIRADTool.UI.SearchPath.pas(140): F2063 Could not compile used unit 'CEIRADTool.Types.pas'

my control penal version for fast report is in SS


Comments

Leave a Comment

Rich Text Editor. To edit a paragraph's style, hit tab to get to the paragraph menu. From there you will be able to pick one style. Nothing defaults to paragraph. An inline formatting menu will show up when you select text. Hit tab to get into that menu. Some elements, such as rich link embeds, images, loading indicators, and error messages may get inserted into the editor. You may navigate to these using the arrow keys inside of the editor and delete them with the delete or backspace key.