anchor.diff:  
   procedure TForm1.FormCreate(Sender: TObject);
   begin
  -  // for test purpose
  -  AllocConsole;
  -
     // start Toby
     toby := TToby.Create;
     toby.onLoad := @tobyOnLoad;
  
positive.code: 
  procedure TForm1.Button1Click(Sender: TObject);
  begin
    toby.start(PAnsiChar('toby'), PAnsiChar(Memo1.Text));
  end;
  
  procedure TForm1.Button2Click(Sender: TObject);
  
negative.code: begin
    writeln('host :: tobyOnLoad called');
    Form1.Memo2.Lines.Add('host :: tobyOnLoad called');
  
    // dummy loop
    toby.run(PAnsiChar('setInterval(function(){},1000);'));
    toby.run(PAnsiChar('console.log("node :: hi~");'));
  end;
  procedure tobyOnUnload(isolate: Pointer; exitCode: Integer); cdecl;
  