Cria um objeto do tipo calendário.
Hierarquia
- TControl
- MsCalend
Construtores
Propriedades
Métodos
Exemplos
Exemplo 1
#include "TOTVS.CH" User Function MsCalend() DEFINE DIALOG oDlg TITLE "Exemplo MsCalend" FROM 180,180 TO 550,700 PIXEL // Cria objeto oMsCalend := MsCalend():New(01,01,oDlg,.T.) // Define o dia a ser exibido no calendário oMsCalend:dDiaAtu := ctod( "01/01/2008" ) // Code-Block para mudança de Dia oMsCalend:bChange := {|| Alert('Dia Selecionado: ' + dtoc(oMsCalend:dDiaAtu)) } // Code-Block para mudança de mes oMsCalend:bChangeMes := {|| alert('Mes alterado') } ACTIVATE DIALOG oDlg CENTERED Return
Exemplo da classe MsCalend
Abrangência
Microsiga Protheus 8.11, Microsiga Protheus 11, Protheus 10, TOTVS Application Server 10, TOTVS Application Server 11
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas