Teaser #1

Teaser #1

Async(
  function: string;
  begin
    Result := RunHtReport(Template, ''); 
  end,
  procedure(s: string);
  begin
    $('#orders').html := s
  end
);

Teaser #2

Form1.OnDblClick := Script.CreateAnonymousFunction('MessageDlg(''Test'', mtWarning, [mbYes, mbNo, mbCancel], 0)').AsNotifyEvent;