Пытаюсь "скрестить" Delphi c Python при помощи модуля "PythonForDelphi", при этом столкнулся с непонятной ошибкой. Все предлогаемые примеры к этому модулю содержат Application файлы, но дабы сократить размер исполняемого файла, хочу запускать его через консоль. Но все усилья приводят к ошибке.
Работающий пример:
PHP код:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, PythonEngine;
type
TForm1 = class(TForm)
PythonEngine1: TPythonEngine;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
PythonEngine1.ExecString('print "Hello!!!"');
end;
end.
Моя неудачная попытка:
PHP код:
program PuthonEXE;
{$APPTYPE CONSOLE}
uses
SysUtils,
PythonEngine;
var
PythonE: TPythonEngine;
Command: String;
begin
PythonE := TPythonEngine.Create(nil);
PythonE.ExecString('print "Hello!!!"');
WriteLn('');
ReadLn(Command);
end.
Не знаю что здесь неверно, наверное неправильно создаётся тип PythonE, как реализовать это в consol.