Alterar quot;items.stringquot; de uma ComboBox em tempo de

25/06/2008

1

É 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.


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?

ComboBox1.Items.Strings[1]:= ´String Atualizada´;



flw.


Responder