Top.Mail.Ru
Ответы

Pascal-Lazarus + Python (Попытка запустить скрипт питона через паскаль)


Не понимаю, как сделать чтоб питон присоединился к Lazarus (я использую python4lazarus в качестве пакета). Он выдает ошибку ACCESS VIOLATION что бы я не делал (а делал я всякое 2 дня), ну я уже даже в папку скинул одну с проектом и даже без папки с надписью Python пробовал просто все высунуть. Выдает он ошибку и все, даже deepseek не помог, что за бредятина, как этим пользоваться вообще, может ему не dll нужен или этот не подходит o-0 (Скрины если что с папкой где код лазаруса и папкой питона, ну и с кодом и ошибкой два)

По дате
По рейтингу
Аватар пользователя
Новичок
1мес
Аватар пользователя
1мес
12345678910111213141516171819202122
 uses 
  SysUtils, 
  PythonEngine; 
 
var 
  py: TPythonEngine; 
 
begin 
  py := TPythonEngine.Create(nil); 
  try 
    // PythonEngine сам найдет подходящую dll'ку из установленных в системе питонов 
    // если не найдет подходящей dll, то он тебе скажет 
    // можно указать и свой путь, нужно указывать полный путь до dll 
    //py.DllPath := ExtractFilePath(ParamStr(0)) + 'Python\'; 
    //py.DllName := 'python312.dll'; 
    py.LoadDll; // битность dll и проги должны быть строго = 
    py.ExecString(py.EncodeString('print("Привет, Мир!")')); 
  finally 
    py.Free; 
  end; 
  Readln; 
end.