......Python和Pascal(Delphi/Lazarus)都是历史悠久的编程语言，都曾经在历史上扮演者重要角色。只是Pascal没能跟上技术发展潮流，逐步沦为末流。而Python与时俱进，不断跟着时代潮流自我革新，最终在AI时代大放异彩。
......于是有个想法，把Python的灵魂融合到Pascal，会怎样？
构思......其他语言要融合Python，无外乎两种方式：
通过对接API方式，调用和移植python.dll的API如果没有现成的库，自己实现API对接难度较大。目前有一个Python4Delphi和Python4Lazarus的开源库可以使用。
通过命令行方式，调用python.exe，执行Python代码这种方式实现起来比较简单，调用python拿到结果后，再加一些逻辑对结果进行解析。
......两种做法博主都实践过了，最后的效果可以参考我之前发的Python执行器的文章。
......今天先看通过第一种方式子Lazarus中对接Python。Delphi的对接方式跟这个类似。
安装PythonForLazarus三方包......在Lazarus的在线包管理器中，搜索PythonForLazarus包，点击安装即可。
......安装成功后，可以在组件中找到这个包提供的所有Python相关组件。今天我们需要用到其中的两个组件，
TPythonEngine，负责Python调用TpythonGUIInputOutput，负责展示Python输出内容
组件配置.....在新建的Lazarus项目中，从组件中拖入TPythonEngine和TpythonGUIInputOutput组件到窗体，还有一个TMemo组件用于显示Python输出。
......针对PythonEngine1组件，在属性设计器中，设置如下参数，Dll相关参数要清空，我们会通过代码进行设置。IO选择我们拖入PythonGUIInputOutput1组件
......在PythonGUIInputOutput1组件的属性设计器中，把Output属性设置为我们拖入的Memo组件。
......接下来，我们在Form的Create事件中，设置PythonEngine1的DLL相关参数，并加载dll。需要提前在本机提前安装好Python，或者下载Python Embeddable版本，我这里使用的是官网下载的Python3.11 Embeddable版本。
......在Create事件中添加如下代码：
procedure TForm1.FormCreate(Sender: TObject);begin {根据自己Python的安装位置，设置下面的参数} PythonEngine1.DllPath := 'E:\Programs\python311'; PythonEngine1.DllName := 'python311.dll'; {可选。Python启动后执行下面的语句} PythonEngine1.InitScript.Text := 'import sys;print(sys.version)'; {加载dll} PythonEngine1.LoadDll;end;到这一步，就完成了Python组件的设置。接下来我们写一点python测试代码。
调用Python测试代码......再加一个输入框TMemo，用来输入测试的Python代码。最后界面如下：
......上面的是输入框可以输入代码，下面的框展示Python输出结果。
......点击按钮后，执行用户在输入框中输入的代码。执行逻辑参考下面的代码：
procedure TForm1.Button1Click(Sender: TObject);var code: string;begin {获取用户输入代码} code := Trim(Memo1.Text); if code <> '' then PythonEngine1.ExecString(code); {执行代码}end; 运行效果......按F9编译运行我们写好的软件。在上面的输入框输入代码，即可点击运行，在下面的文本框即可看到Python执行的结果。查看下面的动画效果。
