combobox e items
01/05/2003
0
Meu problema é o seguinte:
eu tenho um combobox que ´carrega´ os items de um arquivo .txt.
combobox.items.loadfromfile(arquivo.txt);
os items aparecem na mesma ordem em que estão no arquivo.txt, eu gostaria de que eles mudassem de posição aleatóriamente.
Muito Obrigado.
ål£×äñðrëðþt
Posts
01/05/2003
Adilsond
Se o que deseja é apenas mover os itens de posição utilize:
ComboBox1.Items.Move(PosiçãoInicial,PosiçãoDestino);
01/05/2003
ål£×äñðrëðþt
01/05/2003
Adilsond
Então no seu caso voce terá de criar uma rotina para após a carga inicial do Combo mudar a posição das linhas com o move.
01/05/2003
ål£×äñðrëðþt
01/05/2003
Adilsond
procedure TForm1.MudarPosicao; var I: Integer; begin Randomize; for I := 0 to ComboBox1.Items.Count - 1 do ComboBox1.Items.Move(I,Random(ComboBox1.Items.Count - 1)); end;
01/05/2003
ål£×äñðrëðþt
01/05/2003
Adilsond
2º - Após a linha: combobox.items.loadfromfile(arquivo.txt); voce coloca a chamada para a procedure:
combobox.items.loadfromfile(arquivo.txt);
MudarPosicao;
01/05/2003
ål£×äñðrëðþt
Clique aqui para fazer login e interagir na Comunidade :)