Gerar Vetor...

Delphi

23/03/2004

Olá...

Tenho q gerar um vetor com 20 numeros digitados pelo usuário!

:arrow: Alguem pode mim ajudar?

Abraços
Eduardo


Educdc

Educdc

Curtidas 0

Respostas

Welton

Welton

23/03/2004

Bom Eduardo como eu não sei de onde você vai buscar os números do vetor vou te dar um exemplo de como criar e inserir dado em um vetor.

Vetor : Array[1..20] of Integer;

Vetor[1] := StrtoInt(Edit1.text);
Vetor[2] := StrtoInt(Edit2.text);
e assim vai até gravar os 20 números...


GOSTEI 0
Educdc

Educdc

23/03/2004

Welton

:arrow: E pra eu visualizar todos os o números dos vetores!!

Eduardo


GOSTEI 0
Educdc

Educdc

23/03/2004

Olha só:

Tenho q preecher um vetor com 20 números...

Eu queria usar apenas um edit, um button e um listbox!

A maneira q o usuário digitar o valor no edit e clicar no button ele vai preechendo o vetor e visualizando o numero digitado no listbox!

Como faço?
Abraços
Eduardo

P.S.: Se alguem tiver outra idéia pode falar...


GOSTEI 0
Geno

Geno

23/03/2004

Olha só: Tenho q preecher um vetor com 20 números... Eu queria usar apenas um edit, um button e um listbox! A maneira q o usuário digitar o valor no edit e clicar no button ele vai preechendo o vetor e visualizando o numero digitado no listbox! Como faço? Abraços Eduardo P.S.: Se alguem tiver outra idéia pode falar...


Serio..praticamente vc falou como se deve fazer...
Qual a dificuldade?
Nao precisa nem criar o vetor. O proprio listbox ja eh um.


No evento CLICK do botao vc poe:

ListBox1.Items.Append(Edit1.Text);


Assim ele vai inerir em cada linha do listbox o valor que tiver
digitado no edit.


GOSTEI 0
Educdc

Educdc

23/03/2004

Ok...

:arrow: Agora como faz pra ele ih salvando no vetor?

Abraços
Eduardo


GOSTEI 0
Geno

Geno

23/03/2004

Ok... :arrow: Agora como faz pra ele ih salvando no vetor? Abraços Eduardo


Veja..o ListBox eh um vetor!!!
Para que vc quer aplicar essa redundancia?

tudo que vc faria num vetor vc pode fazer usando direto o listbox.
Nao precisa vc abastecer outro vetor, uma vez que a listbox ja esteja abastecida.


GOSTEI 0
Educdc

Educdc

23/03/2004

Mas tem como fazer uma pesquisa do contéudo de um ListBox?

Ex.:

Tenho 10 numeros no listbox quero saber qual eh o maior!
???

Abraços
Eduardo


GOSTEI 0
Joilson_gouveia

Joilson_gouveia

23/03/2004

Para percorrer os elementos de um listbox:

var
i:Integer;
begin

for i := 0 to ListBox1.Count-1 do
ShowMessage(´Item nro. ´+IntToStr(i+1)+´: ´+ListBox1.Items[i]);

end;


GOSTEI 0
Educdc

Educdc

23/03/2004

Para percorrer os elementos de um listbox: var i:Integer; begin for i := 0 to ListBox1.Count-1 do ShowMessage(´Item nro. ´+IntToStr(i+1)+´: ´+ListBox1.Items[i]); end;


N consegui compreender...


GOSTEI 0
Paulo_amorim

Paulo_amorim

23/03/2004

Olá

pegar maior valor de um listbox:

var maior, i: Integer;
begin
  { inicializa variavel MAIOR supondo que soh sejam digitados numeros naturais }
  maior := -1;
  for i := 0 to ListBox.Count -1 do
  begin
     if ListBox.Items[i] > maior then
        maior := ListBox.Items[i];
  end;
end;


Até+


GOSTEI 0
Geno

Geno

23/03/2004

Mas tem como fazer uma pesquisa do contéudo de um ListBox? Ex.: Tenho 10 numeros no listbox quero saber qual eh o maior! ??? Abraços Eduardo



Para fazer uma pesquisa por um numero em especifico vc pode utilizar isso aki:

ListBox1.Items.IndexOf(´valorAPEsquisar´)



Se vc deseja percorrer vc deve fazer como nosso amigo abaixo sugeriu.


GOSTEI 0
POSTAR