|
| Inicio → WINDEV 25 → Bom dia a todos! Com relação a LGPD, alguém sabe como desativar este menu da table quando clica com o botão direito do mouse? |
| Bom dia a todos! Com relação a LGPD, alguém sabe como desativar este menu da table quando clica com o botão direito do mouse? |
| Iniciado por Boller, 12,ago. 2021 15:02 - 1 respuesta |
| |
| | | |
|
| |
Miembro registrado
4.547 mensajes |
|
| Publicado el 12,agosto 2021 - 15:02 |
Bom dia a todos!
Com relação a LGPD, alguém sabe como desativar este menu da table quando clica com o botão direito do mouse?
Solução:
AAFDisable(aafCopy)
AAFDisable(aafCopyAll)
AAFDisable(aafPrintReportOnTable)
AAFDisable(aafChart)
AAFDisable(aafTableToExcel)
AAFDisable(aafTableToWord)
AAFDisable(aafTableToXML)
Ou
DesabilitaMenuAAF(MyWindow..name)
Procedure DesabilitaMenuAAF(LOCAL sNomeObjeto is string)
IF NOT gbHabilitarMenuAAF THEN
AAFDisable({sNomeObjeto, indControl}, aafCopy)
AAFDisable({sNomeObjeto, indControl}, aafCopyAll)
AAFDisable({sNomeObjeto, indControl}, aafPrintReportOnTable)
AAFDisable({sNomeObjeto, indControl}, aafChart)
AAFDisable({sNomeObjeto, indControl}, aafTableToExcel)
AAFDisable({sNomeObjeto, indControl}, aafTableToWord)
AAFDisable({sNomeObjeto, indControl}, aafTableToXML)
END
Obrigado ao Paulo Viana e Rinaldo por compartilhar os exemplos
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | |
| |
Miembro registrado
4.547 mensajes |
|
| Publicado el 12,agosto 2021 - 15:23 |
Para exportação de dados
Procedure Bloqueia_Exportacao()
ix is int = 1
sControle is string = EnumControl(MyWindow..Name,ix,byTabOrder)
WHILE sControle <> ""
SWITCH {sControle}..Type
CASE typTable
IF USUARIO.PERMITE_EXPORTACAO = False
{sControle}..PopupMenu = PopupMenuDisabled
END
OTHER CASE
END
ix++
sControle = EnumControl(MyWindow..Name,ix,byTabOrder)
END
Exemplo do Leomar
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | | | |
| | |
|