Вопрос по массивам?

← →
Barlok © (2003-04-17 18:43) [0]

У меня вопрос по двумерным массивам. Мне нужно через Label вывести матрицу в виде прямоугольника, а delphi выводит одной строкой.

нужно
0000
1111
2222
3333

выводит 0000111122223333

Я пробывал написать еще строку

Label1.caption := Label1.caption + #13; - но комп. посылает подальше. Код программы представлен ниже:

procedure TForm1.Button1Click(Sender: TObject);
const
p = 3;
var
a : array [0..p,0..p]of integer;
i, j : integer;
begin

for i := 0 to p do
for j := 0 to p do
begin
begin
a[i,j] := i;
label1.Caption := label1.Caption +" "+ intTostr(a[i,j]);

end;
end;

end;

end.

← →
MBo © (2003-04-17 18:48) [1]

выводи лучше в многострочные контролы- tlistbox или Tmemo

← →
Anatoly Podgoretsky © (2003-04-17 18:48) [2]

Куда, куда он тебя послал?
Использовать нужно #13#10 не привыкай к плохому.
Вставляй после этого.
end;
end;

Нескромный попрос, а зачем тебе двойные операторные скобки?

а это наверно он так циклы пишет :) сколько вложений столько и оп. скобок

Вопрос по массивам? Найти похожие ветки