[gadmaker]

Пытаюсь "скрестить" 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.

[roamer]

>PythonE := TPythonEngine.Create(nil);

Может быть "он" не хочет работать без Parent или(или) Owner ?