Procedure para preencher ComboBox

18/07/2008

1

Boa Tarde.

Estou querendo criar um procedimento para completar uma ComboBox com determinados valores. Porém, gostaria de ´centralizar´ esse procedimento em algum local e apenas chamar ele nos forms.

Ou seja: eu chamo local.procedimento(nomeComboBox) e ele preenche com os valores pré-configurados nele.

Alguém poderia me dizer em que local eu deveria colocar esse procedimento?

e no caso a variavel nomeComboBox teria que ser de que tipo (já que seria o nome do componente ComboBox)? TComboBox?



Obrigado
Mateus Jr.


Responder

Posts

18/07/2008

Mazzi

sim, ou senao use um vetor, tipo Array.


Responder

18/07/2008

Catunda

Vc pode colocar o procedimento em uma unit qualquer que seja referenciada nos forms onde se utilizará o procedimento, ou coloque-o no formulario principal e ao criar cada form execute o procedimento apontado para o form recem criado. Esse direcionamento para o form recem criado pode ser passado diretamente no parametro do procedimento, algo como: carregacombo(nomedoform.nomedocombo);.

procedure LoadCombo(xcombo:tcombobox; xvalores:tstrings);
var
i: Integer;
begin
xcombo.Items.Clear;
for i:=0 to xvalores.Count-1 do
xcombo.Items.Add(xvalores.Strings[i]);
end;


Responder

19/07/2008

Mateusjr

Obrigado pelas respostas. :)

Consegui resolver.
:)


Responder