Fórum Trabalhando com vetor #181849
12/09/2003
0
Eu tenho 10 edit´s na tela e um vetor declarado ´ Vet array [1..9] of real´
Queria que ao clicar em um botao ele carregasse esse vetor com os valores DE CADA edits e depois mostrasse em algum lugar.
Muito grato.
Att .
Marcelo.
Queria que ao clicar em um botao ele carregasse esse vetor com os valores DE CADA edits e depois mostrasse em algum lugar.
Muito grato.
Att .
Marcelo.
Marcelototini
Curtir tópico
+ 0
Responder
Posts
12/09/2003
Nigro
O seu vetor deve ser de 0..9 e onde você quer mostrar esses valores?
Responder
Gostei + 0
12/09/2003
Ricna
Não sei p/q, mas pode ser isso:
procedure TForm1.Button1Click(Sender: TObject);
var
vetor:array[1..10]of real;
begin
vetor[1]:= strtofloat(edit1.text);
label1.caption:=floattostr(vetor[1]);
vetor[2]:= strtofloat(edit2.text);
label2.caption:=floattostr(vetor[2]);
...até 10
end;
procedure TForm1.Button1Click(Sender: TObject);
var
vetor:array[1..10]of real;
begin
vetor[1]:= strtofloat(edit1.text);
label1.caption:=floattostr(vetor[1]);
vetor[2]:= strtofloat(edit2.text);
label2.caption:=floattostr(vetor[2]);
...até 10
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)