javascript - Delphi MSScriptControl JS インデックスで文字列から文字を取得できません

Question

Delphi プログラムで JS スクリプトを実行する必要があります。

私を悩ませている問題があります。

js: OleVariant;Form1 のセクションに入れて、次のpublicコードを使用します。

procedure TForm1.FormCreate(Sender: TObject);
begin
  js := CreateOleObject('ScriptControl');
  js.Language := 'JScript';
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Memo4.Text := js.Eval(Memo3.Text);
end;

その後、この JS コードは正常に動作します。

var s = 'rtfm'
s.slice(0,1)

戻りますr。

しかし、このコード:

var s = 'rtfm'
s[0]

空を返します。

また、このチェック;

var s = 'rtfm'
s[0]==undefined

true を返します。

JSON オブジェクトがない場合も同様の状況が観察されるため、実行できませんでしJSON.parseた。しかし、私はこのコードを見つけました。これにより、実行後に JSON を使用できるようになりました。