Classe: TSpinBox
Cria um objeto do tipo caixa de seleção, cujo os itens são definidos a partir de um intervalo numérico.
TSrvObject -> TControl -> TSpinBox
Propriedade | Descrição | Tipo |
bChange | Indica 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 |
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
Exemplo da classe tSpinBox
Microsiga Protheus 8.11
,
Microsiga Protheus 11
,
Protheus 10
,
TOTVS Application Server 10
,
ByYou Application Server
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas