Copiado de https://github.com/deividyalcantara/show-message-fmx
TMensagemDlg.MessageDlg( FormHome, 'XXXXXXXXX', 'XXXX XXXXXXXXX XXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXX!', TModeloDialogType.mdModelo1Aviso, [mbSim, mbNao, mbAjuda], [EventoMensagem1, EventoMensagem2, EventoMensagem3], [False, False, True] );
TMensagemDlg.Destruir;