从Delphi添加强类型RttiVariant以向DWS脚本公开

从Delphi添加强类型RttiVariant以向DWS脚本公开,delphi,dwscript,Delphi,Dwscript,我希望对我的脚本进行一些编译时检查,因此不希望将全局变量仅作为RTTIVariant公开。我将使用以下代码向脚本公开Screen对象 Delphi端全局变量创建 var CompVar : TdwsGlobal; .. CompVar := dwsUnit1.Variables.Add; CompVar.Name := 'Screen'; CompVar.DataType := 'RttiVariant'; CompVar.OnReadVar := onGetScreen; procedure

我希望对我的脚本进行一些编译时检查,因此不希望将全局变量仅作为RTTIVariant公开。我将使用以下代码向脚本公开Screen对象

Delphi端全局变量创建

var CompVar : TdwsGlobal;
..
CompVar := dwsUnit1.Variables.Add;
CompVar.Name := 'Screen';
CompVar.DataType := 'RttiVariant';
CompVar.OnReadVar := onGetScreen;

procedure onGetScreen(info: TProgramInfo; var value: Variant);
begin
  value := TdwsRTTIVariant.FromObject(Screen);
end;
我想做的是将“RttiVariant”替换为“RttiVariant”。脚本不喜欢在Delphi端使用强RTTIVariant类型,但在脚本端却很满意。 如何实现这一目标?

在dwscript central添加了增强请求(437)