Delphi 7 - Вывод массива.

Question

Вот мой фрагмент кода: 
procedure TForm1.Button1Click(Sender: TObject); 
var 
a:array[1..28] of byte; 
i:integer; s:string; 
begin 
Randomize; 
 for i:=1 to 28 do 
 begin 
a:=random(9); 
 end; 
 for i:=1 to 28 do 
 memo1.Lines.add(InttoStr(a)); 
end; 
Массив выводится, только не в ряд, а в столбик! 
Как вывести его сплошной линией?

Мария Москвичева · Accepted Answer

по-моему, вполне логично, что Lines.add добавляет новую строку ( линию ). На это как бы название намекает. 
ты либо добавляй к имеющейся строке, либо сначала формируй строку, а потом ее уже через Lines.add

Оксана Кляницкая · Answer

with memo1, memo1.lines {с ходу не скажу что именно} do Text:=StringReplace(Text, #13#10, ' ', [rfReplaceAll]);

Елена Малышко · Answer

for i:=Low(a) to High(a) do 
 Memo1.Lines[0]:=Memo1.Lines[0]+' '+IntToStr(a);

Оленька Москва · Answer

Вы забыли добавить [ i ]: 
 
for i:=1 to 28 do 
memo1.Lines.add(InttoStr(a [ i ] )); 
end;