Форум: "Основная";
Поиск по всему сайту: 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.028 c
7-67031           sindbad               2001-12-18 16:40  2002.03.21  
Com1 + контроллер


6-66945           Gua                   2002-01-07 21:29  2002.03.21  
Имя компьютера ?


3-66722           LNF                   2002-02-20 09:20  2002.03.21  
А можно использовать локально BDE в виде набора dll, подключаясь к БД не через TTable, а через TQuery?


14-67016          Leo^Sun               2002-01-29 07:39  2002.03.21  
Программа в программе.


6-66953           otari                 2002-01-06 20:02  2002.03.21  
Как мне отправить e-mail через мой прог !!!