То ли лыжи не едут...

← →
Michael C (2002-03-06 16:45) [0]

После такой строки
Mas[StrToInt (A)]:= Mas[StrToInt (A)]+ StrToInt(N3);
как считать все полученные элементы массива, к примеру в Мемо???

← →
Виктор Щербаков © (2002-03-06 16:48) [1]

for i := Low(Mas) to High(Mas) do
Memo.Lines.Add(IntToStr(Mas[i]));

← →
Michael C (2002-03-06 17:08) [2]

Спасибо Виктору, но что-то не то...
Дело в том, что у меня из массива выбираются одинаковые строчки, и вот их нуно по одному разу вывести...

← →
DieHard © (2002-03-06 17:13) [3]

Удалено модератором

for i := Low(Mas) to High(Mas) do
if Memo.Lines.IndexOf(IntToStr(Mas[i])) = -1 then
Memo.Lines.Add(IntToStr(Mas[i]));