Á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 5 Próxima »

Classe: MsWorkTime

Cria um objeto do tipo barra de período.

TSrvObject -> TControl -> MsWorkTime


New

Método construtor da classe.


MsWorkTime(): New ( [ oWnd], [ nRow], [ nCol], [ nHeight], [ nWidth], [ nResolution], [ cValue], [ bWhen], [ bChange] ) --> oObjeto


 

NomeTipoDescriçãoObrigatórioReferência
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.  
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres.  
nHeightNuméricoIndica a altura em pixels do objeto.  
nWidthNuméricoIndica a largura em pixels do objeto.  
nResolutionNuméricoIndica a resolução que será aplicada na barra de período.  
cValueCaracterIndica os intervalos que serão preenchidos. Esses intervalos podem ser utilizados através do método SetValue().  
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada de dados, na janela em que o controle foi criado, estiver sendo efetuada. Observação: O bloco de código retornará verdadeiro (.T.), se o controle permanecer habilitado; caso contrário, retornará falso (.F.).  
bChangeBloco de códigoIndica o bloco de código que será executado quando o estado ou conteúdo do objeto é modificado pela ação sobre o controle visual.  

 

oObjeto
    (objeto)
  • Retorna o objeto criado.

oMsWorkTime := MsWorkTime():New(oDlg,01,01,260,184,0,'',{||.T.},{||} )

GetBlocks

Retorna o número de blocos selecionados.


MsWorkTime(): GetBlocks ( ) -->


oMsWorkTime:GetBlocks()   // Result: 10

GetInterTime

Retorna o período selecionado no formato <HH:MM:SS>.


MsWorkTime(): GetInterTime ( [ nBloco] ) --> cPeriodo


 

NomeTipoDescriçãoObrigatórioReferência
nBlocoNuméricoIndica o bloco do calendário que deverá retornar o período.  

 

cPeriodo
    (caracter)
  • Retorna o período selecionado no formato "HH:MM:SS".

 

 

 


oMsWorkTime:GetInterTime(1) // Result: "00:15, 00:30"

GetValue

Retorna os itens selecionados no formato <XX X XX>.


MsWorkTime(): GetValue ( ) --> cRet

cRet
    (caracter)
  • Retorna os itens selecionados no formato "XX X XX".

As posições que são identificadas com "X" representam o tempo marcado e o espaço em branco " " o tempo desmarcado.

 

 


oMsCalendGrid:GetValue()   // Result: "X X XX X                          X X XX X"

SetResol

Define a resolução de apresentação da barra de períodos.


MsWorkTime(): SetResol ( [ nResolution] ) -->


 

NomeTipoDescriçãoObrigatórioReferência
nResolutionNuméricoIndica a resolução de apresentação da barra de período.  

 


oMsWorkTime:SetResol(10)

Exemplo do método SetResol

SetValue

Define os valores de preenchimento.


MsWorkTime(): SetValue ( [ cValor] ) -->


 

NomeTipoDescriçãoObrigatórioReferência
cValorCaracterIndica o valor que será definido.  

 


oMsWorkTime:SetValue('X X XX X                          X X XX X')

 

PropriedadeDescriçãoTipo
bChangeIndica o bloco de código que será executado quando o estado ou conteúdo do objeto é modificado pela ação sobre o controle visual.Bloco de código

 


#include "TOTVS.CH"
User Function MsWorkTime()
DEFINE DIALOG oDlg TITLE "Exemplo MsWorkTime" FROM 180,180 TO 550,700 PIXEL
oMsWorkTime := MsWorkTime():New(oDlg,01,01,260,184,0,'',{||.T.},{||} )
oMsWorkTime:SetValue('X X XX X X X XX X')
ACTIVATE DIALOG oDlg CENTERED
Return

Exemplo da classe MsWorkTime

Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

 

  • Sem rótulos