TPrinterSetupDialog

// Главная форма
frm=new TForm();
frm.Caption="JS+ - диалоговый компонент TPrinterSetupDialog";
frm.Width =450;
frm.Height=300;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=' Нажмите кнопку "Параметры принтера"';

// Кнопка
btn=new TButton(frm);
btn.Caption="Параметры принтера";
btn.Width=btn.TextWidth(btn.Caption)+20;
btn.Left=(frm.ClientWidth-btn.Width)/2;
btn.Top =(stb.Top-btn.Height)/2;
btn.OnClick=btn_Click;

frm.ShowModal();

// Обработчик события OnClick
function btn_Click(btn)
{
  var dlg;

  // Диалог
  with (dlg=new TPrinterSetupDialog(frm)) {
    Title="Настройка принтера ...";
    Execute();
  }

  dlg.Delete();
}