![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() |
punkska |
![]()
Сообщение
#1
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 139 Пол: Мужской Репутация: ![]() ![]() ![]() |
Поля
1. ф 2. И 3. О 4. оценка 5. др пойск по оценке Проверте пожалуйста правильность написанной программы особенно с файлами! не на путал ли я что... может есть излишества или глупости! ![]() и может кто поможет с процедурой пойска...а то что-то она не получаеться... -------------------- ЗДЕСЬ МОГЛА БЫТЬ ВАША РЕКЛАМА!!!!
|
![]() ![]() |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
Вроде никаких явно бросающихся в глаза недочетов нет, за исключением, возможно, вот чего:
У тебя в программе сразу выделяется память под 1000 записей, так? Зададимся вопросом: "А почему именно 1000?" ![]() Вот я и клоню к тому, что... А почему бы не перестать забивать память сразу заведомо ограниченным количеством записей (которые, возможно, никто и не использует, но с другой стороны - а если понадобится больше? А нельзя ![]() Так вот, собственно, предложение: Type И потом Выделить, как ты и делал, память под массив Stud, только он будет содержать НЕ сами данные, а указатели на них. Тогда при необходимости добавить данные в массив - делается так:
Как результат - более гибкая работа с памятью (которой, как известно, много никогда не бывает), да и обрабатывать сможешь не до 1000, а до 16380 записей, что, согласись, серьезнее ![]() Как тебе такой вариант? А насчет поиска - что именно у тебя не получается? Что надо сделать с теми, кто критерию поиска удовлетворяет? Просто распечатать? Или где-то сохранить? Так ведь множества тоже никто не отменял. Или эмуляторы множеств для большего числа элементов ![]() |
punkska |
![]()
Сообщение
#3
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 139 Пол: Мужской Репутация: ![]() ![]() ![]() |
Цитата Как результат - более гибкая работа с памятью (которой, как известно, много никогда не бывает), да и обрабатывать сможешь не до 1000, а до 16380 записей, что, согласись, серьезнее ![]() ![]() ой блин! тут надо ещё удаление сделать, но с этим разберёмся! ещё немножко над процедурой пойска посижу и покажу её... зы а что за скрипт работает на странице?! он очень не нравиться фоксу) ![]() -------------------- ЗДЕСЬ МОГЛА БЫТЬ ВАША РЕКЛАМА!!!!
|
volvo |
![]()
Сообщение
#4
|
Гость ![]() |
Цитата а что за скрипт работает на странице?! Это подсветка синтаксиса. На больших исходниках может подтормаживать (хотя у меня тоже FF, и в этой теме пока тормозов не заметно). Если хочешь - убери из поста программу, все равно есть присоединенный архив... Done |
punkska |
![]()
Сообщение
#5
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 139 Пол: Мужской Репутация: ![]() ![]() ![]() |
а вот с удалением крах полный! если у кого есть минутка помогите мне с этими злобными процедурами
![]() procedure Delete(var n:integer;var Stud: PtrClass; такой набросок! я в нём уже запутался 100 раз! ![]() Сообщение отредактировано: volvo - 2.11.2006 16:56 -------------------- ЗДЕСЬ МОГЛА БЫТЬ ВАША РЕКЛАМА!!!!
|
volvo |
![]()
Сообщение
#6
|
Гость ![]() |
Ты расскажи, что именно ты удалять хочешь? какой-то один конкретный элемент, или несколько сразу? (можно и так и так сделать)
|
punkska |
![]()
Сообщение
#7
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 139 Пол: Мужской Репутация: ![]() ![]() ![]() |
да...я думаю не стоит заморачиваться и стоит удалять по 1 элементу...
-------------------- ЗДЕСЬ МОГЛА БЫТЬ ВАША РЕКЛАМА!!!!
|
volvo |
![]()
Сообщение
#8
|
Гость ![]() |
Ну, если по одному, тогда вот так:
procedure Delete(var n:integer; var Stud: PtrClass); |
punkska |
![]()
Сообщение
#9
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 139 Пол: Мужской Репутация: ![]() ![]() ![]() |
опять я решил делать как легче и ошибся(
![]() голова гудит от преподавателя! ![]() вот набросал процедуру удаления как и плонировал, но опять прокол! и процедура пойска не удаёться((( " (Показать/Скрыть)
набросок ![]() а ещё надо сделать эту же задачу используя связанный список а потом всё это в виде объектов да и занимательную графику вставить...но этим я займусь в среду! а пока надо это доколотить! *помогите люди добрые* (С) -------------------- ЗДЕСЬ МОГЛА БЫТЬ ВАША РЕКЛАМА!!!!
|
volvo |
![]()
Сообщение
#10
|
Гость ![]() |
punkska, пойми, ты даешь выдранную из контекста информацию, и я ничем не могу тебе помочь... Ты не объяснил, что значат параметры, которые ты передаешь в Delete, но тот вариант, который предложил я (безо всяких параметров кроме количества элементов в массиве, и собственно массива Stud - прямое удаление по номеру) тебя не устроил...
Так расскажи, что содержат параметры Data, F_kol, F_mas, opis... |
punkska |
![]()
Сообщение
#11
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 139 Пол: Мужской Репутация: ![]() ![]() ![]() |
Вечер добрый
Вон я что написал! и за что получал целый день по голове! что необходимо сделать 1 пойск по дате (оказываеться) ! как вам мой выриант? мне пока не нравиться... 2 сделать ввод в процедуре пойска (раньше было в меню) 3. разделитьь на 2 пункта УДАЛИТЬ и ПОЙСК (ну это не проблема) на что прошу обратить внимание на процедуру пойска и удаления! что-то я там репитов дофига наставил (в один момент даже запутался) ну и просто ошибочки посмотрите! ПРЕПОДАВАТЕЛЬ ОЧЕНЬ СТРОГО относиться к правильности и грамотности прог.! " (Показать/Скрыть)
изменил ввывод! убрал лишнюю кашу! оцените! Прикрепленные файлы ![]() -------------------- ЗДЕСЬ МОГЛА БЫТЬ ВАША РЕКЛАМА!!!!
|
punkska |
![]()
Сообщение
#12
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 139 Пол: Мужской Репутация: ![]() ![]() ![]() |
почему если внести ввод даты для пойска в тело процедуры... процедура начинает работать не верно?
![]() -------------------- ЗДЕСЬ МОГЛА БЫТЬ ВАША РЕКЛАМА!!!!
|
volvo |
![]()
Сообщение
#13
|
Гость ![]() |
Телепатия? Как изменил, что сделал - покажи...
|
punkska |
![]()
Сообщение
#14
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 139 Пол: Мужской Репутация: ![]() ![]() ![]() |
Внимание на процедуры ПОЙСК и УДАЛИТЬ и на их обращение в меню
1. убрал запрос из меню и добавил в тело ПОЙСКА ( ввод даты для пойска) после этого не отображаеться таблица найденных (она пуста) я понимаю почему это...точнее догадываюсь, но мне кажеться и так должно рабатать... Если вернуть ЗАПРОС НА ДАТУ ДЛЯ ПОЙСКа в меню, то таблица найденных отображаеться но тогда --> 2. удаление! что-то тут не чисто ! удаляет не по одному а по 2, 3 и тп (с первого и по номерр вводимый с кл) вроде ясно где искать ошибки! но не вижу их((( ![]() зы Лето только наступилп, а телепаты уже в отпуске((( жаль( =) Прикрепленные файлы ![]() -------------------- ЗДЕСЬ МОГЛА БЫТЬ ВАША РЕКЛАМА!!!!
|
volvo |
![]()
Сообщение
#15
|
Гость ![]() |
Глобальные переменные - зло... Избавляйся от них. Это одно.
Второе: в процедуре Search есть такие строки: ...А расскажи мне, зачем ты вводишь дату, если потом ее нигде на протяжении этой процедуры не используешь? Да и не только в этой процедуре, а вообще... Ты часом Date с Data не перепутал??? Это условие тоже порадовало: if (Y_=Y) and (M_=M) and ((D_=D) or (D_<>D)) thenособенно его правая часть ![]() |
punkska |
![]()
Сообщение
#16
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 139 Пол: Мужской Репутация: ![]() ![]() ![]() |
Спасибо Volvo, выручил) и насмешил))
![]() ![]() ![]() блин... меня еле откачали! в юмор надо) ![]() осталось удаление... будем ошибку искать) -------------------- ЗДЕСЬ МОГЛА БЫТЬ ВАША РЕКЛАМА!!!!
|
![]() ![]() |
![]() |
Текстовая версия | 22.06.2025 13:58 |