hallo,
das wäre auch möglich (als Beispiel,
DB Modul ist nicht unbedingt die beste Lösung)
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var cl:TEngineClient;
begin
datamodule3.PythonEngine1.AddClient(cl);
cl.engine.
cl.engine.
cl.usw
end;
Delphi-Quellcode:
procedure TDataModule3.DataModuleDestroy(Sender: TObject);
var cl:TEngineClient;
i:Integer;
begin
for i:=PythonEngine1.ClientCount-1 downto 0 do
begin
cl:=PythonEngine1.Clients[i];
PythonEngine1.RemoveClient(cl);
end;
end;