Скачать: CL | DM;

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

← →
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;

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

---

← →
Palladin ©   (2003-04-17 19:40) [3]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c