//添加 TPythonDelphiVar 组件，设置 VarName = "delphi_var"
procedure TForm1.UseDelphiVar;
begin
  PythonEngine1.LoadDll;
  
  // 【第1段】通过组件赋值（自动处理类型转换）
  PythonDelphiVar1.Value := '来自 Delphi 的字符串';
  
  // 【第2段】Python 中直接使用这个变量名
  PythonEngine1.ExecString('print(delphi_var.upper())');
  
  // 【第3段】Python 修改后，Delphi 读取
  PythonEngine1.ExecString('delphi_var = "被 Python 修改了"');
  ShowMessage(PythonDelphiVar1.Value);  // 显示修改后的值
end;