Edit receber valor conforme conteudo do combobox?
16/03/2006
0
Galera Estou querendo fazer o seguinte:
Se o valor do items combobox for 01 o edit recebe o texto ´ciro´
Se o valor do items combobox for 02 o edit recebe o valor ´fabiano´
e assim por diante.
Obrigado pela Ajuda de Vocês
[quote:7db61cbfb3=´Moderação´][color=red:7db61cbfb3]Título editado por Massuda.
Por favor, não escreva o texto/título usando apenas letras maiúsculas.[/color:7db61cbfb3][/quote:7db61cbfb3]
Se o valor do items combobox for 01 o edit recebe o texto ´ciro´
Se o valor do items combobox for 02 o edit recebe o valor ´fabiano´
e assim por diante.
Obrigado pela Ajuda de Vocês
[quote:7db61cbfb3=´Moderação´][color=red:7db61cbfb3]Título editado por Massuda.
Por favor, não escreva o texto/título usando apenas letras maiúsculas.[/color:7db61cbfb3][/quote:7db61cbfb3]
Ciro_cj
Curtir tópico
+ 0
Responder
Posts
16/03/2006
Adriano Santos
Galera Estou querendo fazer o seguinte:
Se o valor do items combobox for 01 o edit recebe o texto ´ciro´
Se o valor do items combobox for 02 o edit recebe o valor ´fabiano´
e assim por diante.
Obrigado pela Ajuda de Vocês
[quote:725675ccc2=´Moderação´][color=red:725675ccc2]Título editado por Massuda.
Por favor, não escreva o texto/título usando apenas letras maiúsculas.[/color:725675ccc2]
[/quote:725675ccc2]
if ComboBox1.Items[ComboBox1.ItemIndex] = ´01´ then
Edit1.Text := ´seu texto´
else if ComboBox1.Items[ComboBox1.ItemIndex] = ´02´ then
Edit1.Text := ´seu outro texto´
ou voce pode testar o ItemIndex do combobox
case ComboBox1.ItemIndex of
0: Edit1.Text := ´seu texto´;
1: Edit1.Text := ´seu texto´;
2: Edit1.Text := ´seu texto´;
end;
No ultimo caso uso apenas o indice do item selecionado
Se nenhum item for selecionado o ItemIndex = -1
Responder
16/03/2006
Martins
[quote:b28d5ea968=´Adriano Santos´]
ou voce pode testar o ItemIndex do combobox
No ultimo caso uso apenas o indice do item selecionado
Se nenhum item for selecionado o ItemIndex = -1[/quote:b28d5ea968]
O Mais indicado para para seu caso seria usar [b:b28d5ea968]Case Of[/b:b28d5ea968] como passado pelo [b:b28d5ea968]Adriano[/b:b28d5ea968]. Um vetor tb poderia ser criado, mas nesse caso seria melhor mesmo o Case.
Boa sorte
Galera Estou querendo fazer o seguinte:
Se o valor do items combobox for 01 o edit recebe o texto ´ciro´
Se o valor do items combobox for 02 o edit recebe o valor ´fabiano´
e assim por diante.
Obrigado pela Ajuda de Vocês
[quote:b28d5ea968=´Moderação´][color=red:b28d5ea968]Título editado por Massuda.
Por favor, não escreva o texto/título usando apenas letras maiúsculas.[/color:b28d5ea968]
[/quote:b28d5ea968]
if ComboBox1.Items[ComboBox1.ItemIndex] = ´01´ then
Edit1.Text := ´seu texto´
else if ComboBox1.Items[ComboBox1.ItemIndex] = ´02´ then
Edit1.Text := ´seu outro texto´
ou voce pode testar o ItemIndex do combobox
case ComboBox1.ItemIndex of
0: Edit1.Text := ´seu texto´;
1: Edit1.Text := ´seu texto´;
2: Edit1.Text := ´seu texto´;
end;
No ultimo caso uso apenas o indice do item selecionado
Se nenhum item for selecionado o ItemIndex = -1[/quote:b28d5ea968]
O Mais indicado para para seu caso seria usar [b:b28d5ea968]Case Of[/b:b28d5ea968] como passado pelo [b:b28d5ea968]Adriano[/b:b28d5ea968]. Um vetor tb poderia ser criado, mas nesse caso seria melhor mesmo o Case.
Boa sorte
Responder
16/03/2006
Adriano Santos
Só um detalhe que esqueci
Você ainda pode usar um [b:cca2204a0b]else[/b:cca2204a0b] dentro do case ou ainda:
case ComboBox1.ItemIndex of
0: Edit1.Text := ´seu texto´;
1: Edit1.Text := ´seu texto´;
2: Edit1.Text := ´seu texto´;
else Edit1.Text := ´nenhuma das opções acima forma selecionada´;
end;
Você ainda pode usar um [b:cca2204a0b]else[/b:cca2204a0b] dentro do case ou ainda:
case ComboBox1.ItemIndex of
-1: Edit1.Text := ´nada selecionado´;
0: Edit1.Text := ´seu texto´;
1: Edit1.Text := ´seu texto´;
2: Edit1.Text := ´seu texto´;
else Edit1.Text := ´nenhuma das opções acima forma selecionada´;
end;
Responder
Clique aqui para fazer login e interagir na Comunidade :)
