Форум: "Основная";
Поиск по всему сайту: 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.71 MB
Время: 0.033 c
3-66774           amamed_3071           2002-02-21 14:57  2002.03.21  
Как увеличит TimeOut в AdoConnection


3-66770           Demon ltd             2002-02-21 23:26  2002.03.21  
Присваивание из базы


1-66903           Shoo                  2002-03-06 12:08  2002.03.21  
Обновление данных на форме


3-66726           Alextov               2002-02-07 19:39  2002.03.21  
Как можно быстро програмно загрузить в базу 600 записей так как 600 раз такой код выполняетсся долго


3-66734           gegc                  2002-02-20 09:37  2002.03.21  
Как и чем создать DBF чтобы он открывался в экселе и аксесе И чтобы руссие буквы были похожи на русские буквы? (BDE не предлагать!)