Como trabalhar com Matriz
Olá pessoal tudo bem? Gostaria de saber como eu posso trabalhar com uma matriz no Delphi.
Como carrego os dados em uma matriz de [0..100,0.100] tipo string.
Grato
Como carrego os dados em uma matriz de [0..100,0.100] tipo string.
Grato
Merph
Curtidas 0
Respostas
4_olho
07/07/2003
Segue exemplo de matriz String de 5x5
Em uma nova aplicação, coloque uma StringGrid e nela retire as linhas e colunas fixas (FixedCols=0 e FixedRows=0). No evento OnCreate do form, digite o código
procedure TForm1.FormCreate(Sender: TObject);
var
Matriz: array[0..4, 0..4] of String;
lin, col : integer;
begin
// gero a matriz
for lin:= 0 to 4 do
for col := 0 to 4 do
Matriz[lin, col] := IntToStr(lin)+IntToStr(col);
// exibo a matriz
for lin:= 0 to 4 do
for col := 0 to 4 do
StringGrid1.Cells[col, lin] := Matriz[lin, col];
end;
Cuidado com sua matriz de 101x101, pois vai gerar 10.201 elementos String.
Em uma nova aplicação, coloque uma StringGrid e nela retire as linhas e colunas fixas (FixedCols=0 e FixedRows=0). No evento OnCreate do form, digite o código
procedure TForm1.FormCreate(Sender: TObject);
var
Matriz: array[0..4, 0..4] of String;
lin, col : integer;
begin
// gero a matriz
for lin:= 0 to 4 do
for col := 0 to 4 do
Matriz[lin, col] := IntToStr(lin)+IntToStr(col);
// exibo a matriz
for lin:= 0 to 4 do
for col := 0 to 4 do
StringGrid1.Cells[col, lin] := Matriz[lin, col];
end;
Cuidado com sua matriz de 101x101, pois vai gerar 10.201 elementos String.
GOSTEI 0