import.css=/download/attachments/327912/newLayout.css

Classe: MsWorkTime

Cria um objeto do tipo barra de período.


Hierarquia

TSrvObject -> TControl -> MsWorkTime


Construtores
New

New

Método construtor da classe.


Sintaxe

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


Parâmetros
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.
Retorno
    oObjeto (objeto)
  • Retorna o objeto criado.

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

Métodos
GetBlocks

GetBlocks

Retorna o número de blocos selecionados.


Sintaxe

MsWorkTime(): GetBlocks ( ) -->


Exemplos 
oMsWorkTime:GetBlocks()   // Result: 10
GetInterTime

GetInterTime

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


Sintaxe

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


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
nBlocoNuméricoIndica o bloco do calendário que deverá retornar o período.
Retorno
    cPeriodo(caracter)
  • Retorna o período selecionado no formato "HH:MM:SS".

Observações

 

 

 


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

GetValue

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


Sintaxe

MsWorkTime(): GetValue ( ) --> cRet

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

Observações

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

 

 


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

SetResol

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


Sintaxe

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


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

Exemplos 
oMsWorkTime:SetResol(10)

Preview
Exemplo do método SetResol
SetValue

SetValue

Define os valores de preenchimento.


Sintaxe

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


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

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

Propriedade
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

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

Preview
Exemplo da classe MsWorkTime

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