我尝试在注入"注入的TForm实例上设置一些属性。使用TdwsRTTIConnector和funcion进入脚本:
showmessage('Step1');
var f:RttiVariant<Vcl.Forms.TForm> := ConnectForm('Form1');
f.AlphaBlendValue := 0;
f.AlphaBlend := True;
f.Hide;
f.Color := $00FFFF;
showmessage('Step2');
f.FormStyle := 2;
//f.FormStyle := TFormStyle(2);
f.Show;
f.AlphaBlend := False;
showmessage('Step3');
下一个脚本工作正常,除了 f.FormStyle:= 2; 这一行,得到错误&#34;无效的类类型转换&#34;
SELECT `recordTime`, DISTINCT `TreeHuggerId` FROM `SENSOR_TREEHUGGERS`
WHERE `TreeHuggerId` < 20000 and `TreeHuggerId` > 10000
ORDER BY `recordTime` desc
如何设置类似FormStyle或BorderStyle
的枚举属性由于