PHSYS - Wiki

A função RibbonBotaoDoNome permite acessar um botão da Ribbon UI na tela principal do sistema via script.

Com isso, é possível atribuir ações personalizadas ao botão, sem a necessidade de vinculá-lo a um cadastro específico.

Sintaxe

function RibbonBotaoDoNome(Nome: String): TPHScriptBotaoRibbon;

Exemplo

var
  Botao: TPHScriptBotaoRibbon;
begin
  // Obtém o botão pelo nome
  Botao := RibbonBotaoDoNome('btnExportar');
  if Botao <> nil then
  begin
    // Define uma ação personalizada para o clique do botão
    Botao.OnClick := procedure
    begin
      ShowMessage('Botão Exportar foi pressionado!');
    end;
    // Alterando propriedades do botão
    Botao.Habilitado := True;
    Botao.Visivel := True;
  end
  else
    ShowMessage('Botão não encontrado!');
end.