如何在delphi中加入自己的脚本

发布网友 发布时间:2022-04-21 17:40

我来回答

1个回答

热心网友 时间:2023-07-31 19:16

再下载P4D.exe,然后安装,安装的时候会提供是否编译。

安装后会有PyScripter,是一个python 的IDE,可以用来调试python脚本。

在delphi程序里使用python很容易,如果在IDE下,放一个PythonEngine。但是只允许放一个,如果是动态生成,也只允许创建一个变量。

安装后有demo,可以参照。但是动态创建并没有提及,这里介绍一下。

先定义:

var
pe: TPythonEngine;

初始化:

pe:=TPythonEngine.Create(nil);

pe.LoadDll;

使用:

function
EvalScript(script :string):string;
var

po:PPyObject;
begin
po:=pe.EvalString(script);

if(po<>nil)then
begin

result:=pe.PyObjectAsString(po);

pe.Py_DECREF(po);
end
else

begin
result:='';
end;
end;

EvalString是计算表达式,ExecString是执行一段程序,从IO这个属性中输出。

更多的代码可以下载kicoy,在ScriptUnit单元。

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com