Fórum Ajuda sobre Array em Delphi #581323
12/05/2017
0
Boa tarde,
Eu sou iniciante em Delphi e gostaria de um ajudinha,
programo em um sistema pascal e crio um array assim:
//Declaro dessa forma
Var
e;
// defino o tamanho desta forma
procedure Form1Create(Sender: TObject);
begin
e:=[[0,1,1,0,1,0,0,0,0,0,100,0,0,0,0,0]]; // exemplo 1
n:=VarArrayCreate([0,36],12);for k:=0 to 36 do n[k]:=0; // exemplo 2
end;
// atribuo valores dessa forma
procedure Button1Click(Sender: TObject);
begin
e[0,0]:=1;
e[0,1]:=20
n[0]:=5;
n[1]:=2
end;
Em Pascal isso funciona muito bem, alguém poderia me dizer como eu faço isso funcionar em Delphi?
Obrigado.
Eu sou iniciante em Delphi e gostaria de um ajudinha,
programo em um sistema pascal e crio um array assim:
//Declaro dessa forma
Var
e;
// defino o tamanho desta forma
procedure Form1Create(Sender: TObject);
begin
e:=[[0,1,1,0,1,0,0,0,0,0,100,0,0,0,0,0]]; // exemplo 1
n:=VarArrayCreate([0,36],12);for k:=0 to 36 do n[k]:=0; // exemplo 2
end;
// atribuo valores dessa forma
procedure Button1Click(Sender: TObject);
begin
e[0,0]:=1;
e[0,1]:=20
n[0]:=5;
n[1]:=2
end;
Em Pascal isso funciona muito bem, alguém poderia me dizer como eu faço isso funcionar em Delphi?
Obrigado.
Roberto Rodrigues
Curtir tópico
+ 0
Responder
Post mais votado
13/05/2017
Perivaldo Martins
Responder
Gostei + 1
Mais Posts
13/05/2017
Roberto Rodrigues
Obrigado pela ajuda,
a solução é:
e : Array[0..0,0..15] of Integer = ((0,1,1,0,1,0,0,0,0,0,100,0,0,0,0,0));
a solução é:
e : Array[0..0,0..15] of Integer = ((0,1,1,0,1,0,0,0,0,0,100,0,0,0,0,0));
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)