const集合的Char和Pascal脚本单元导入器

时间:2015-08-31 01:53:45

标签: delphi freepascal pascalscript

我在一台设备上运行Pascal脚本单元导入器,但出现此错误:

"期待令牌' ='但是#39;找到。以前的代币:' WORDDELIMITERS:''"

以下是触发错误的常量:

const
  WordDelimiters: set of Char = [#0..#255] - ['a'..'z','A'..'Z','1'..'9','0'];

常量WordDelimiters是第三方库的一部分。有没有办法重写一些东西,以便Unit Importer可以使用该单元?

测试表明支持一组char:

type
  TWordDelimiters = set of Char; 

单位导入者结果:

procedure SIRegister_MyTestUnit(CL: TPSPascalCompiler);
begin
  CL.AddTypeS('TWordDelimiters', 'set of Char');
end;

但是下面的常数字符串不起作用,有人抱怨' ...'双点:

const
  MyChars = ['A'..'Z', 'a'..'z'];  

跳过双点并手动输入所有字符有效,但是还有另一种方法吗?

const
  MyChars = ['A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z'];

0 个答案:

没有答案