TJvInterpreterProgram: wie einsetzen?

[jim_raynor]

Zitat:

Delphi-Quellcode:

procedure TForm1.JvInterpreterProgram1GetValue(Sender: TObject;
  Identifier: String; var Value: Variant; Args: TJvInterpreterArgs;
  var Done: Boolean);
begin
  if lowercase(Identifier)='showmessage' then begin
    showmessage(args.values[0]);
    done:=true;
  end;
end;

Iihh. Ist das kompliziert. Wenn du das für 20 Funktionen gemacht hast, wird es echt unübersichtlich. Da gelobe ich mir doch lieber Pascal Script Da kann man direkt die Delphi-Funktionen registrieren.