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

Classe: TSpinBox

Cria um objeto do tipo caixa de seleção, cujo os itens são definidos a partir de um intervalo numérico.


Hierarquia

TSrvObject -> TControl -> TSpinBox


Construtores
Create

Create

Método construtor da classe.


Sintaxe

TSpinBox(): Create ( [ oWnd] ) --> oObjeto


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
oWndObjetoIndica a janela ou controle visual onde objeto será criado.
Retorno
    oObjeto(objeto)
  • Retorna o objeto criado.

Exemplos 
TSpinBox():Create( oDlg )
New

New

Método construtor da classe.


Sintaxe

TSpinBox(): New ( [ nRow], [ nCol], [ oWnd], [ bChange], [ nWidth], [ nHeight], [ cMsg], [ bWhen] ) --> oObjeto


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical em pixels.
nColNuméricoIndica a coordenada horizontal em pixels.
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.
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.
nWidthNuméricoIndica a largura em pixels do objeto.
nHeightNuméricoIndica a altura em pixels do objeto.
cMsgCaracterIndica a mensagem, do tipo dica de contexto (tooltip/hint), ao posicionar o ponteiro do mouse sobre o botão.
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.).
Retorno
    oObjeto(objeto)
  • Retorna o objeto criado.

Exemplos 
oSpinBox := TSpinBox():New( 01,01,oDlg,{|x|;    Alert("oSpinBox: "+str(x,4))},30,20,"Mensagem",)

Métodos
SetRange

SetRange

Especifica os valores (de/até) da faixa do botão.


Sintaxe

TSpinBox(): SetRange ( [ nMin], [ nMax] ) -->


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
nMinNuméricoIndica o valor mínimo do botão.
nMaxNuméricoIndica o valor máximo do botão.

Exemplos 
oSpinBox:SetRange( 100, 200 )
SetStep

SetStep

Especifica o valor de etapa do botão.


Sintaxe

TSpinBox(): SetStep ( [ nStep] ) -->


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
nStepNuméricoIndica o valor de etapa do botão.

Exemplos 
oSpinBox:SetStep( 30 )
SetValue

SetValue

Especifica um valor para o botão.


Sintaxe

TSpinBox(): SetValue ( [ nVal] ) -->


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
nValNuméricoIndica o valor do botão.

Exemplos 
oSpinBox:SetValue( 40 )
SetWrap

SetWrap

Especifica se o botão é de envolver (Wrap).


Sintaxe

TSpinBox(): SetWrap ( [ lwrap] ) -->


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
lwrapLógicoIndica se habilita(.T.)/desabilita(.F.) o envolver (wrap) do botão.

Exemplos 
oSpinBox:SetWrap( .T. )

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 
user function exemplo()local oTestDialog := Nillocal oSpinBox := Nil, nSpinBox := -10local oButtom := Nillocal oSay := Nil  oTestDialog := msDialog():new(0, 0, 300, 400, , , , , , , , , , .T.)    oSay := tSay():new(5, 5, {|| "tSpinBox: "}, oTestDialog, , , , , , .T., , , 30, 13)    oSpinBox := tSpinBox():new(3, 45, oTestDialog, {|x| nSpinBox := x }, 30, 13)      oSpinBox:setRange(-50, 50)      oSpinBox:setStep(5)      oSpinBox:setValue(nSpinBox)    oButtom := tButton():new(3, 155, "Valor", oTestDialog, {|| MsgInfo(nSpinBox, "tSpinBox value:") }, 40, 13, , , , .T.)  oTestDialog:activate( , , , .T.)return

Preview
Exemplo da classe tSpinBox

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