procedure Test1;
  var wndFrmFornecedores : OleVariant;
  var pageControl : OleVariant;
  var SATNav : OleVariant;
begin
  wndFrmFornecedores := Aliases.SATFornecedores.wndFrmFornecedores;
  pageControl := wndFrmFornecedores.Panel2.PageControl;
  pageControl.ClickTab('Endereço');
  SATNav := wndFrmFornecedores.Panel.SATNav;
  SATNav.Click(286, 11);
  pageControl.Endere_o.Panel.GroupBox.check.ClickButton(cbChecked);
  SATNav.Click(205, 13);
end;