Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 3 393

/ вопрос открыт /

Приветствую, уважаемые эксперты!
У меня проблема с одной программой! Я еще новичок в программировании более-менее, поэтому вопросов много и все долго разбираются) Я просто вам вышлю программу, которую было бы неплохо отделать и завершить, я уверен там для многих абсолютно ничего сложного не будет, честно говоря это моя курсовая на сегоднящний день, но мне пока она дается не очень легко! Короче буду рад вашим исправлениям и ответам, желательно хотяб в обучительнйо форме. Тоесть что можете, поясните при ответе.

К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)

Timmy Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Timmy (статус: Посетитель)
Вопрос отправлен: 12 ноября 2009, 03:36
Состояние вопроса: открыт, ответов: 0.


Мини-форум вопроса

Всего сообщений: 37; последнее сообщение — 12 ноября 2009, 21:33; участников в обсуждении: 4.

Страницы: [1] [2] [Следующая »]

Егор

Егор (статус: 10-ый класс), 12 ноября 2009, 05:14 [#1]:

во наглость

Цитата (Timmy):

Я просто вам вышлю программу, которую было бы неплохо отделать и завершить, я уверен там для многих абсолютно ничего сложного не будет

у нас min@y™ такое делает
ЗА ПИВО
к нему и обращайтесь

можно и ко мне, но уже за деньги
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
Егор

Егор (статус: 10-ый класс), 12 ноября 2009, 05:15 [#2]:

считаю, что вопрос надо удалить
причина - вопроса нет
не сформулировано НИЧЕГО - не описана проблема, не дано даже задание
так только - "а вот скачайте файл, там и разберётесь"

в архиве, кстати, описания работы, либо ТЗ тоже нет
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
min@y™

min@y™ (статус: Доктор наук), 12 ноября 2009, 09:38 [#3]:

Цитата (Егор):

у нас min@y™ такое делает ЗА ПИВО к нему и обращайтесь


Тут облом:
1) я не занимаюсь базами данных;
2) ненавижу ковыряться в чужих исходниках.

Так что я пас.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!

12 ноября 2009, 10:36: Вопрос перемещён из тематического раздела Delphi » Программирование баз данных (БД) в раздел Лабораторный практикум модератором Ерёмин А.А.

Вадим К

Вадим К (статус: Академик), 12 ноября 2009, 11:35 [#4]:

исправить то мы сможем, но так как я не Ваш преподаватель, то, что я исправлю, скорее всего не понравиться Вашему преподавателю, а скорее всего будет непонятно. А также и Вам будет непонятно. Поэтому это плохое дело и многие согласятся. Не нужно задавать такие вопросы, надо разбираться самому - это же курсовая.

А вот если нашли в своем коде что то не так, вот приводите, попробуем разжевать.
Галочка "подтверждения прочтения" - вселенское зло.
Timmy

Timmy (статус: Посетитель), 12 ноября 2009, 14:37 [#5]:

Хорошо! Раз такое дела - то выложу несколько из основных проблем в моей программе! Я думал можете и сами кто хочет разобрать и объяснить, малоли время есть лишнее! Так, ладно)
Сначало самый легчайший вопрос, сам вижу что легко, но пояснить конкретно никто не может: Как связать ComboBox1, который находится на GroupBox1 с нужным ему DBGrid1!? Все на одной форме, но перечень из таблицы никак не выскакивает в комбо!!! Главный прикол - есть образец похожей проги, где это работает - но понять что изменено - никак! Так как все вродь так же)))
Дальше: вот такой кодик программы:

procedure TForm2.SpeedButton1Click(Sender: TObject);
begin
if edit1.text=Form1.ADOTable1.FieldByName('Фамилия').asstring
then begin showmessage('Данные существуют'); end
else
Form1.ADOTable1.Insert;
Form1.ADOTable1.FieldByName('Фамилия').AsString:=edit1.text;
Form1.ADOTable1.FieldByName('Имя').AsString:=edit2.text;
Form1.ADOTable1.FieldByName('Отчество').AsString:=edit3.text;
Form1.ADOTable1.FieldByName('Адрес').AsString:=edit4.text;
Form1.ADOTable1.FieldByName('Телефон').AsString:=edit5.text;
Form1.ADOTable1.Post;
end;

Вроде все правильно, а не работает, должен поидеи записывать, а выдает ошибку! Для подробного анализа можете посмотреть мою программу подробно! Или так спрашивайте, что еще хотите узнать!

Дальше: фильтрация не работает, данные к примеру есть в таблице, но ничего фильтровать не хочет:

procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
if ComboBox2.Text='Выберите поле' then
ShowMessage('Выберите поле')
else
ADOTable1.Filter:= ComboBox2.Text+'='+QuotedStr(Edit2.Text);
ADOTable1.Filtered:=true;
end;

Опять же все кажется подозрительно правильным!
Timmy

Timmy (статус: Посетитель), 12 ноября 2009, 14:43 [#6]:

Кстати егор, это никакая не наглость! Что за бред так сказать))) Я просто впервые на этом сайте, и нне знаю еще какие у вас тут правила и все такое, а на меня сразу же начали наезжать, то не так, это не так! Можно было просто вежливо попросить задать вопрос(ы) конкретно, разве нет?! :) а тут сразу хамить) В архиве полностью программа с базой, мало что работает, кому в коде что не понятно, то смотрите по архиву или спрашивайте сюда!
min@y™

min@y™ (статус: Доктор наук), 12 ноября 2009, 14:52 [#7]:

Цитата (Timmy):

Вроде все правильно, а не работает, должен поидеи записывать, а выдает ошибку! Для подробного анализа...


Для подробного анализа есть отладчик. Поставь точку останова на строку if edit1.text=... и тыкни SpeedButton1. А затем потихонечку шажочками по F8 найди, в какой строке вылезает еррор. Это называется локализацией ошибки.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Вадим К

Вадим К (статус: Академик), 12 ноября 2009, 14:52 [#8]:

Если выдает ошибку, то надо писать какую. телепаты в отпуске.
Но подозреваю, что не добавляется по той причине, что не все поля заполнены. Либо заполнены неверно.
Комбобокс так просто "не связывается" с гридом. Никак. грид только отображает данные, но не предоставляет их.
А связывать надо DBCombobox и TADOTable
Галочка "подтверждения прочтения" - вселенское зло.
Вадим К

Вадим К (статус: Академик), 12 ноября 2009, 15:02 [#9]:

Цитата (Timmy):

Я просто впервые на этом сайте, и нне знаю еще какие у вас тут правила и все такое, а на меня сразу же начали наезжать, то не так, это не так

Ну есть же правило "В Риме веди себя как римлянин" или "в чужой монастырь с своей Библией не хотят". думаю идея понятна - на правила не надо обижаться. Под Вас подстраиваться не будут. Слишком уж много Вас, под всех не подстроишься.
Галочка "подтверждения прочтения" - вселенское зло.
min@y™

min@y™ (статус: Доктор наук), 12 ноября 2009, 15:03 [#10]:

Цитата (Timmy):

Я просто впервые на этом сайте, и нне знаю еще какие у вас тут правила и все такое, а на меня сразу же начали наезжать


Айяйяй, дарагой, как нихарашё! Правила выложены в свободном доступе, и то, что ты их не знаешь, это твоя проблема.

Сорри за оффтоп.

Цитата (Timmy):

а тут сразу хамить


Блин, а вываливать свою бажную прогу ЦЕЛИКОМ (!!!) и просить найти в ней ошибки, это НЕ ХАМСТВО?!! Скажи спасибо, что сразу не послали, а всё-таки заниматься с тобой пытаемся.

Цитата (Timmy):

В архиве полностью программа с базой, мало что работает, кому в коде что не понятно, то смотрите по архиву или спрашивайте сюда!


Да никому твоя программа не нужна, кроме тебя самого. Никто не будет тратить своё время на чтение и анализ исходников целой программы, особенно с именами контролов по умолчанию и кривым форматированием, чтобы тупо получить 5 баллов и плюс к репутации.
Мы пытаемся тебя заставить самому начать исправлять свои же ошибки.

Цитата (Timmy):

Вроде все правильно, а не работает, должен поидеи записывать, а выдает ошибку!


Мы должны угадать, какую именно ошибку выдаёт?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Timmy

Timmy (статус: Посетитель), 12 ноября 2009, 16:19 [#11]:

Вадим К. и min@y™, не ну я все понимаю, но я же не грубил никому а вежливо попросил объяснить что где не так! Все я понимаю что правила и тд, но я прост предложил и все, логично подумать что можно было прост так же ответить, мол выложи главное ошибки и проблемы, какую ошибку выдает и тд... Неужели так трудно буть добрее и вежлевее?! Или работа уже совсем в горло душит?!... Так зачем тогда так работать если свою работу ненавидите?! Я ничего не требуя, просто предложил как я думал, что могут помочь, аналогично могли бы и сказать, что нужно выложить первым, а не опять таки грубить, min@y™, и говорить что ты не прав, ты ничего не знаешь, тебе тут делать нечего!!! И меня заставлять исправлять ошибки не стоит, я сам знаю, что нужно делать, я за помощью пришел сюда, а не за выеснением у других некоторых, кто что должен и кто что может! Да и кстати, ПОПРОСИТЬ помочь в исправление ошибок - это совсем не хамство! А если тут есть которые еще и посылают, то что эта за помошь такая))) смысл просить помоши))) К примеру тебя лично никто не просил и помогать, раз такое дело) Очень уж разные у нас мировоззрения.
Короче, кто немног помог спс, буду разбираться, может позже смогу другие проблемы выложить.
Вадим К

Вадим К (статус: Академик), 12 ноября 2009, 16:30 [#12]:

А почему все люди считают, что их сорцы откроют и будут смотреть? не у всех есть делфи, даже винды нет.
И да, работа есть, и задаром разбираться никто не будет.

Поэтому мы и просим конкретизировать вопрос. А то что наши попытки конкретизировать воспринимаются так... это уже не наши проблемы.

Я отвечал вежливо. я могу грубо, но не делаю так.

если кажеться, что у нас на машине воспроизведётся таже ошибка, то глубоко ошибаетесь. далеко не факт. Возможно ошибка в недопонимании, как оно работает. то есть для меня это может быть штатная ситуация, а для кого то - грубая ошибка.
Галочка "подтверждения прочтения" - вселенское зло.
min@y™

min@y™ (статус: Доктор наук), 12 ноября 2009, 16:38 [#13]:

Цитата (Timmy):

Так зачем тогда так работать если свою работу ненавидите?!

Работа тут абсолютно ни при чём. Я обожаю свою работу.

Цитата (Timmy):

могли бы и сказать, что нужно выложить первым, а не опять таки грубить, min@y™

Где цитата моей грубости? Перечитал весь топик, не увидел.

Цитата (Timmy):

и говорить что ты не прав, ты ничего не знаешь, тебе тут делать нечего!!!

Не вижу, где это?

Цитата (Timmy):

Да и кстати, ПОПРОСИТЬ помочь в исправление ошибок - это совсем не хамство!

Представь, один фермер пришёл к соседу и говорит, что посадил 100 га картошки, но она даже не взошла. Помоги сделать так, чтобы она прям щас заколосилась, как, вон, у тебя! Сходи, покопайся у меня в земле и скажи, что я не так сделал.

Цитата (Timmy):

А если тут есть которые еще и посылают

Да, извини, тут, как и во всём интернете, есть модераторы и админы. Удивлён?

Такую постановку "вопроса" я вижу первый раз, причём не только на этом сайте. Представляешь, если б хотя бы половина таких "программистов" так делали, что б было?

Короче, твой послений пост - вообще не по делу.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Timmy

Timmy (статус: Посетитель), 12 ноября 2009, 16:41 [#14]:

Вадим К, я в курсе, что грид только отобразитель данных, но ведь как-то он же работает с данными в таблице, вроде все данные связаны и на месте, начинаю заново создавать программу по образцу - ничего не выдает при поисе, просто ничего не происходит, никаких ошибок, все так же написано. Может просто подробно объясните, как связать хотябы этот DBComboBox1 с данными в таблице, может с ним получится у меня. Я кстати в DBComboBox1 вижу только связь с DataSource1, а не с ADOTable1.
Timmy

Timmy (статус: Посетитель), 12 ноября 2009, 16:45 [#15]:

Вадим К, ну против вашего ответа ж я ничего такого не имею, грубо могут все ответить, а вот с пониманием немногие, надо просто и отвечать по принципу вопроса, зачем грубо - я ж нормально спрашиваю ;) , нужно не выяснять ситуации, а подробнее проблему устранять, вот.
Вадим К

Вадим К (статус: Академик), 12 ноября 2009, 16:52 [#16]:

DataSource1 - это посредник. через него как раз и связывается. Также надо указать какое поле надо отображать.
Всю теорию по связыванию не буду рассказывать - много там всего.

Цитата (undefined):

нужно не выяснять ситуации, а подробнее проблему устранять, вот.

Как я могу ответить на вопрос, не узнав, в чем проблема. Но если выуживание проблем с вопрошающего, что бы помочь ему - грубость, тогда да, я груб. Хотя я до конца эту цитату не понял.
Галочка "подтверждения прочтения" - вселенское зло.
Timmy

Timmy (статус: Посетитель), 12 ноября 2009, 16:57 [#17]:

min@y™, я аналогично обожаю свою работу, но есть трудности - вот я и здесь) это должно быть понятным) Где твои грубости - а что ты нежно общаешься?! Где посылают, не видишь собственных строк?! "Скажи спасибо, что сразу не послали=тебе тут делать нечего!!!". ВОт именно, в твоей истории сосед в приказном тоне говорит "сходи, покопайся", я что-нибудь похожее в похожем тоне говорил?! я только просил помочь, а побольшому счету тут и не хотят помогать многие, как получаестя) Нет, представь себе, совсем не удивлен, что и админы и модеры тут есть, вот наоборот, был бы удивлен если б их тут не было))) вот было бы смешно, неправда ли) Кстати, не знаешь, как можно видеть "такую постановку вопроса впервые" и причем "не только на этом сайте"!? какая-то нелипеца))) Я вот думаю, что ты больше знаешь, программирование или умение обидеть и нагрубить людям!?))) наверное второе) Как тебя самого тогда можно назвать "программистом", когда ты уходишь от главной проблемы по существу и пристаешь к вопросам нравственности, то не так сказал, этим ты не доволен и тд...!!! Я решения проблем просил, а не выяснений обстоятельств не по вопросам программирования! Если тебе нечего вразумительного спросить по программе или добавить по существу - тебя никто не заставляет отписывать в этом топике, не так ли?! =)
Timmy

Timmy (статус: Посетитель), 12 ноября 2009, 17:00 [#18]:

Нет, нет, вадим К, выуживание проблем с вопрощающего - это разумеется нормально, что тут грубого, прост надо не так выуживать как к примере min@y™.
Вадим К

Вадим К (статус: Академик), 12 ноября 2009, 17:00 [#19]:

А можно как то на абзацы разбивать? мысль не читается и расплывается.
Галочка "подтверждения прочтения" - вселенское зло.
Timmy

Timmy (статус: Посетитель), 12 ноября 2009, 17:03 [#20]:

Ок, конечно можно, прост не думал, что может быть трудно вникать, там немного, да и не по главной теме, не по программе)

Страницы: [1] [2] [Следующая »]

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 11:43
Выполнено за 0.02 сек.