各位大大好: 我曾在 Foxpro 中用過這樣 s = 'i = 123' ; i = 0 ; &s 結果 i 會等於 123 因為 &s 會去執行 i = 123 請問 delphi 有類似的功能嗎?? 我一直找不到 Carter

No, you probably need some kind of scripting support. There exists 3rd party components...

你可以 import msscript.ocx , 透過微軟的 ScriptControl 的物件去執行 Script ,只是最好參考一下 MSDN 相關的使用方法 ! 或者是你可以去找一個 FastScript 的商用套件 , 可以模擬 Pascal 的語法

謝謝各位大大: 我找到了 http://www.apelseen.com/activex_shell/ 裡面有一段 ... var this_form, scripting : Variant; begin // creating ActiveX Shell for the object given as 'Self' (this form) this_form := obj_to_variant(Self); // creating an instance of MS Script Control scripting := CreateOLEObject('ScriptControl'); scripting.AllowUI := True; scripting.Language := 'VBScript'; // The fist way is to add name to ScriptControl's namespace // example of creation of 'this' reference which is global name for code of all scripts scripting.AddObject('this', this_form, True); // example of use of the reference 'this' scripting.ExecuteStatement( 'this.Caption = "New Caption 1"' #13#10 'MsgBox(this.Caption)' ); end; Carter