TOTVSTEC

Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 2 Próxima »

Classe: MsCalend

Cria um objeto do tipo calendário.


Hierarquia

TSrvObject -> TControl -> MsCalend


Construtores
New

New

Método construtor da classe.


Sintaxe

MsCalend(): New ( [ nRow], [ nCol], [ oWnd], [ lCanMultSel] ) --> oObjeto


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical.
nColNuméricoIndica a coordenada horizontal.
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.
lCanMultSelLógicoIndica se habilita (.T.)/desabilita (.F.) a seleção de múltiplos dias.
Retorno
    oObjeto(objeto)
  • Retorna o objeto criado.

Exemplos 
oMsCalend := MsCalend():New(01,01,oDlg,.T.)

Métodos
AddRestri

AddRestri

Adiciona uma data com restrição no calendário.


Sintaxe

MsCalend(): AddRestri ( < nDia>, < nCorFonte>, [ nCorBorda] ) -->


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
nDiaNuméricoIndica a data que será restringida. X
nCorFonteNuméricoIndica a cor da fonte. X
nCorBordaNuméricoIndica a cor da borda.

Exemplos 
oMsCalend:AddRestri(10, CLR_GREEN, CLR_HRED)

Preview
Exemplo do método AddRestri
ColorDay

ColorDay

Define a cor das colunas.


Sintaxe

MsCalend(): ColorDay ( ) -->


Exemplos 
oMsCalend:ColorDay( 1, CLR_HRED )oMsCalend:ColorDay( 3, CLR_GREEN )

Preview
Exemplo do método ColorDay
CtrlRefresh

CtrlRefresh

Atualiza as informações do calendário.


Sintaxe

MsCalend(): CtrlRefresh ( ) -->


Exemplos 
oMsCalend:CtrlRefresh()
DelAllRestri

DelAllRestri

Exclui todas as restrições do calendário.


Sintaxe

MsCalend(): DelAllRestri ( ) -->


Exemplos 
oMsCalend:DelAllRestri()
DelRestri

DelRestri

Exclui a restrição de uma determinada data.


Sintaxe

MsCalend(): DelRestri ( [ nDia] ) -->


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
nDiaNuméricoIndica a data para excluir a restrição.

Observações

 

 


Exemplos 
oMsCalend:DelRestri(10)

Propriedade
PropriedadeDescriçãoTipo
bChangeIndica o bloco de código que será executado quando o estado ou conteúdo do objeto for modificado pela ação sobre o controle visual.Bloco de código
bChangeMesIndica o bloco de código que será executado ao selecionar um novo mês.Bloco de código
dDiaAtuIndica ou retorna o dia selecionado.Data
lCanMultSelIndica se habilita (.T.)/desabilita (.F.) a seleção de múltiplos dias.Lógico

Exemplos 
#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

Preview
Exemplo da classe MsCalend

Abrangência
Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

  • Sem rótulos