标题: 请教 [打印本页]

---

作者: ppujhufan    时间: 2007-10-24 11:18     标题: 请教

如何在一个可以有公式的表，然后与delphy连接，在d中显示计算结果。谢谢！

---

作者: 网事如风    时间: 2007-12-13 13:40

//edit1.text :=  '3 * (23 - (34/23 - 22)) + 33'
//uses comobj;
procedure TForm1.Button1Click(Sender: TObject);
var
vScript: Variant;
str:string;
begin
str:=edit1.text;
vScript:=CreateOleObject('ScriptControl');
vScript.Language := 'JavaScript';
str:=vScript.Eval(str);
showmessage(str);
end;

---

欢迎光临 编程开发论坛 (http://bbs.lihuasoft.net/)

Powered by Discuz! 6.0.0