Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> сравнение итемов в листбокс, сравнить номера строк 
:(
    Опции темы
neweraser
Дата 18.3.2008, 20:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 598
Регистрация: 17.2.2008

Репутация: нет
Всего: 6



у меня программа уже написана, но есть небольшой глюк (т.е. не глюк, просто я не понимаю), всего один.
я уже приводил этот алгоритм, он так и остался неотвеченным в прошлой теме, т.к. она уже в оффтопике
Код

for z:= 0 to high(lDest) do
  for x:=0 to listbox3.Items.Count - 1 do
  if lDest[z] = StrToInt(listbox3.Items[x]) then
    for c:=0 to listbox2.Items.Count - 1 do
    if listbox3.Items[x] = listbox2.Items[c] then //вот тут не понимаю, сравниваются элементы или номера строк?
      for v:= 0 to length(lDest) do
      listbox4.Items.Add(listbox2.Items[c]);



--------------------
Кто ищет, тот всегда найдет.
PM MAIL ICQ Skype   Вверх
THandle
Дата 18.3.2008, 20:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 50
Всего: 372



neweraser
Цитата(neweraser @  18.3.2008,  20:53 Найти цитируемый пост)
if listbox3.Items[x] = listbox2.Items[c] then //вот тут не понимаю, сравниваются элементы или номера строк?

Тут ты сравниваешь сами строки.
PM   Вверх
neweraser
Дата 18.3.2008, 21:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 598
Регистрация: 17.2.2008

Репутация: нет
Всего: 6



а как сделать, чтоб сравнивать именно номера строк?


--------------------
Кто ищет, тот всегда найдет.
PM MAIL ICQ Skype   Вверх
THandle
Дата 18.3.2008, 21:22 (ссылка) |    (голосов:3) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 50
Всего: 372



neweraser, а чем не устроит:

Код

if x = c then


Ы?
PM   Вверх
pseud
Дата 24.3.2008, 13:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Экспёрт Тыдыщ
***


Профиль
Группа: Завсегдатай
Сообщений: 1175
Регистрация: 18.5.2007
Где: Минск, Беларусь

Репутация: 10
Всего: 40



Цитата(neweraser @  18.3.2008,  20:53 Найти цитируемый пост)
for z:= 0 to high(lDest) do


если пишешь high(lDest), то видимо стоит писать и low(lDest), ведь он возможно и не 0

Код

for z := Low(lDest) to High(lDest) do



THandle, Ы +1


--------------------
Испытание чужого терпения можно считать успешным, если оно лопнуло...
PM MAIL   Вверх
neweraser
Дата 26.3.2008, 23:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 598
Регистрация: 17.2.2008

Репутация: нет
Всего: 6



Цитата(pseud @  24.3.2008,  13:10 Найти цитируемый пост)
for z := Low(lDest) to High(lDest) do

это я знаю, у меня программа и помоему работает  smile , это даже есть вроде в книге, за которую говорили будут банить (где-то пост был)  smile 


--------------------
Кто ищет, тот всегда найдет.
PM MAIL ICQ Skype   Вверх
THandle
Дата 26.3.2008, 23:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 50
Всего: 372



Цитата(neweraser @  26.3.2008,  23:09 Найти цитируемый пост)
это даже есть вроде в книге, за которую говорили будут банить (где-то пост был)

Из за вот этой то книги и возникают подобные вопросы... действительно надо банить...

сорри за оффтоп.
PM   Вверх
SneG0K
Дата 26.3.2008, 23:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Max Mara
***


Профиль
Группа: Завсегдатай
Сообщений: 1887
Регистрация: 1.12.2007
Где: Wis Dells

Репутация: 3
Всего: 54



Цитата(THandle @  26.3.2008,  22:41 Найти цитируемый пост)
Из за вот этой то книги и возникают подобные вопросы... действительно надо банить...

Согласен smile +1
PM WWW Skype   Вверх
MetalFan
Дата 27.3.2008, 00:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 22
Всего: 128



Цитата(pseud @  24.3.2008,  13:10 Найти цитируемый пост)
то видимо стоит писать и low(lDest), ведь он возможно и не 0

если дин.массив, то и ноль сгодиться


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
neweraser
Дата 27.3.2008, 23:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 598
Регистрация: 17.2.2008

Репутация: нет
Всего: 6



Цитата(MetalFan @  27.3.2008,  00:26 Найти цитируемый пост)
если дин.массив, то и ноль сгодиться 

хоть кто-то меня поддерживает, спасибо, и еще раз изв за оффтоп


--------------------
Кто ищет, тот всегда найдет.
PM MAIL ICQ Skype   Вверх
MetalFan
Дата 28.3.2008, 00:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 22
Всего: 128



Цитата(neweraser @  27.3.2008,  23:24 Найти цитируемый пост)
хоть кто-то меня поддерживает

я не поддерживаю, я констатирую факт в частном случае при применении дин.массива.
если это стат.массив, то действительно лучше использовать Low()


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.0733 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.