Mh, ok.
Werde dann mal etwas rumprobieren.
So.
Delphi-Quellcode:
procedure TForm1.PSScript1Execute(Sender: TPSScript);
var
SH: TScriptHelper;
begin
SH := TScriptHelper.Create;
Sender.SetVarToInstance('SH', SH);
Sender.ExecuteFunction([1], 'Start');
end;
Kompilieren geht einwandfrei, die Klasse ist registriert. Mein Skript sieht so aus:
Delphi-Quellcode:
procedure Start(Action: Byte);
begin
SH.SendNext('test');
end;
Bei ExecuteFunction() gibt es einen Stack-Überlauf
Muss ich es vielleicht an einer anderen Stelle aufrufen?