Classe: TComboBox
Cria um objeto do tipo caixa de seleção (ComboBox).
Este controle permite a entrada de dados de múltipla escolha através dos itens definidos em uma lista vertical. Essa lista pode ser acessada ao pressionar a tecla F4 ou pelo botão à direita do controle.
Cria um objeto do tipo caixa de seleção (ComboBox).
Este controle permite a entrada de dados de múltipla escolha através dos itens definidos em uma lista vertical. Essa lista pode ser acessada ao pressionar a tecla F4 ou pelo botão à direita do controle.
TSrvObject -> TControl -> TComboBox
Propriedade | Descrição | Tipo |
aItems | Indica uma lista de itens e caracteres que serão apresentados. Essa lista pode ter os seguintes formatos: Seqüencial (Exemplo: {"item1","item2",...,"itemN"}) ou Indexada (Exemplo:{"a=item1","b=item2",...,"n=itemN"}). | Vetor |
nAt | Indica a posição do item selecionado. | Numérico |
A variável associada a caixa de seleção (ComboBox) pode ter o valor de um dos itens selecionados ou o índice de uma lista indexada.
#include "TOTVS.CH"User Function TComboBox()Local aItems:= {'Item1','Item2','Item3'} DEFINE DIALOG oDlg TITLE "Exemplo TComboBox" FROM 180,180 TO 550,700 PIXEL // Usando New cCombo1:= aItems[1] oCombo1 := TComboBox():New(02,02,{|u|if(PCount()>0,cCombo1:=u,cCombo1)},; aItems,100,20,oDlg,,{||Alert('Mudou item da combo')}; ,,,,.T.,,,,,,,,,'cCombo1') // Usando Create cCombo2:= aItems[2] oCombo2 := TComboBox():Create(oDlg,{|u|if(PCount()>0,cCombo2:=u,cCombo2)},22,02,; aItems,100,20,,{||Alert('Mudou item da combo')},,,,.T.,; ,,,,,,,,'cCombo2') ACTIVATE DIALOG oDlg CENTERED Return
Exemplo da classe TComboBox
Advanced Protheus 6.09
,
Advanced Protheus 7.10
,
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