Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.04.2008, 13:27   #1
Arkuz
Форумчанин
 
Аватар для Arkuz
 
Регистрация: 22.09.2007
Сообщений: 540
Восклицание Списки...

У меня вопрос не по компоненту, а по структуре данных.

Мне нужно сделать лабу - хеширование. Я вроде бы с горем пополам написал её. Но вот в чём проблема. Когда я ищу нужный мне элемент в списке почемуто нахожу один из списка, остальные не находит, а поиск осуществляется странно выводит p^.next. Я так понял, что это из за того, что у меня нет указателя на голову, поэтому и проверка осуществляется с текущего элемента где-то в середине.
Помогите организовать процедуру поиска. И вообще есть у кого литература очень подробная по спискам. Я там кое чего ещё не понимаю.
Файл проги прикрепил, смотрите...
Вложения
Тип файла: rar HASH.rar (7.8 Кб, 26 просмотров)
Arkuz вне форума Ответить с цитированием
Старый 19.04.2008, 14:46   #2
alexBlack
Участник клуба
 
Регистрация: 12.10.2007
Сообщений: 1,204
По умолчанию

Цитата:
Сообщение от Arkuz Посмотреть сообщение
Я так понял, что это из за того, что у меня нет указателя на голову ...
ИМХО указатель-то у вас есть - mas[i]. (как я понял используется несколько списков.) Но вы его активно уничтожаете при добавлении очередного элемента. Вот здесь:
while mas[i]^.next<>nil do mas[i]:=mas[i]^.next;

Непонятно по каким причинам вы выделяете отдельно случай
mas[i]^.next = nil

То есть про реализацию списков нужно еще почитать. Наберите в поисковике "Связанные списки"
alexBlack вне форума Ответить с цитированием
Старый 19.04.2008, 22:58   #3
Arkuz
Форумчанин
 
Аватар для Arkuz
 
Регистрация: 22.09.2007
Сообщений: 540
По умолчанию

спасибо...
Arkuz вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
На списки... Neznau Паскаль, Turbo Pascal, PascalABC.NET 1 02.07.2008 19:49
Списки Вилен Общие вопросы C/C++ 3 22.05.2008 00:40
списки Влдислаав3911 Паскаль, Turbo Pascal, PascalABC.NET 5 10.05.2008 17:35
Списки AVer Паскаль, Turbo Pascal, PascalABC.NET 6 06.12.2006 23:05