Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
Pagetitle |
---|
...
...
|
...
|
Cria
...
um
...
objeto
...
do
...
tipo
...
barra
...
de
...
período.
Hierarquia
...
...
- MsWorkTime
Construtores
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Propriedades
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Métodos
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Exemplos
Bloco de código | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
#include "TOTVS.CH"
User Function MsWorkTime()
NewMétodo construtor da classe.MsWorkTime(): New ( [ oWnd], [ nRow], [ nCol], [ nHeight], [ nWidth], [ nResolution], [ cValue], [ bWhen], [ bChange] ) --> oObjeto
oObjeto
oMsWorkTime := MsWorkTime():New(oDlg,01,01,260,184,0,'',{||.T.},{||} ) GetBlocksRetorna o número de blocos selecionados.MsWorkTime(): GetBlocks ( ) --> oMsWorkTime:GetBlocks() // Result: 10 GetInterTimeRetorna o período selecionado no formato <HH:MM:SS>.MsWorkTime(): GetInterTime ( [ nBloco] ) --> cPeriodo
cPeriodo
oMsWorkTime:GetInterTime(1) // Result: "00:15, 00:30" GetValueRetorna os itens selecionados no formato <XX X XX>.MsWorkTime(): GetValue ( ) --> cRet cRet
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" SetResolDefine a resolução de apresentação da barra de períodos.MsWorkTime(): SetResol ( [ nResolution] ) -->
oMsWorkTime:SetResol(10) Exemplo do método SetResol SetValueDefine os valores de preenchimento.MsWorkTime(): SetValue ( [ cValor] ) -->
oMsWorkTime:SetValue('X X XX X X X XX X')
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
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