Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Вниз

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


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]

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



Виктор Щербаков   (2002-03-06 17:14) [4]

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




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.022 c
3-66775           tovSuhov              2002-02-21 10:58  2002.03.21  
Необходим ли первичный ключ?


14-67014          Nest                  2002-02-08 11:27  2002.03.21  
никто не делал лабу


7-67018           Shadow77              2001-12-17 16:46  2002.03.21  
MMSYSTEM274 Используемое устройство MCI...


1-66859           21333                 2002-03-04 21:19  2002.03.21  
StringGrid


14-66971          Леша                  2002-02-06 07:20  2002.03.21  
Прелагаю обсудить курьезы в фантастических произведениях и ответить на вопрос: Нужна ли логига в фонт. произведении?