Alterar quot;items.stringquot; de uma ComboBox em tempo de
25/06/2008
0
É possível alterar o [b:515f4ec297]Items.String [/b:515f4ec297]de uma [b:515f4ec297]ComboBox[/b:515f4ec297] em tempo de execução?
Fiz algumas tentativas mas não consegui.
Se alguem tiver alguma sugestão, agradeço.
Obrigado.
Fiz algumas tentativas mas não consegui.
Se alguem tiver alguma sugestão, agradeço.
Obrigado.
Cps.art
Curtir tópico
+ 0
Responder
Posts
25/06/2008
Du_nirvana
Olá, não sei se é bem isso que você quer, no exemplo usei um combobox, em edit e três botões, sendo que o primeiro botão insere o que estiver escrito no edit, o segundo retira do combo o que estiver escrito no edit e o terceiro retira todos elementos do combo:
procedure TForm1.INSEREClick(Sender: TObject); begin ComboBox1.Items.Add(Edit1.Text); end; procedure TForm1.RETIRAClick(Sender: TObject); var vl_i: integer; begin FOR vl_i := 0 TO ComboBox1.Items.Count DO BEGIN ComboBox1.ItemIndex := vl_i; IF ComboBox1.Text = Edit1.Text THEN BEGIN ComboBox1.Items.Delete(vl_i); Break; END; END; end; procedure TForm1.LIMPACOMBOClick(Sender: TObject); begin ComboBox1.Text := ´´; ComboBox1.Items.Clear; end;
Responder
27/06/2008
Pestana_
é isso?
flw.
ComboBox1.Items.Strings[1]:= ´String Atualizada´;
flw.
Responder
Clique aqui para fazer login e interagir na Comunidade :)