Часовой пояс: UTC + 3 часа




Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 19 
  Пред. тема | След. тема 
В случае проблем с отображением форума, отключите блокировщик рекламы
Автор Сообщение
 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Коллеги всем добра. (Я ни разу не программист)
Постараюсь кратко и ясно.
Надо написать прогу на Делфи 7 для управлением БД (на Access). Управление это значит, добавить запись, удалить запись. Сортировка этих записей (по дате). И вывод отчетов.
На Access накидал базу из 3 таблиц.
В делфи открыл новый проект, связал БД с проектом через АДО. На форму кинул Дбгрид, а даже что-то отображается из базы.
Кинул кнопки добавить записи и кнопку отчеты.
И застопорился.
Понятно что при нажатии на Добавить записи, должно открываться новое окно с полями, куда ввожу данные. Потом эти данные должны попасть в соответствующие поля в БД Access.

Прогу хочу принципиально написать самостоятельно, т.к. потом надо рассказывать как делал.
Если кто разжует - спасибо.



Партнер
 

Junior
Статус: Не в сети
Регистрация: 30.09.2013
fandnb писал(а):
Коллеги всем добра. (Я ни разу не программист)
Постараюсь кратко и ясно.
Надо написать прогу на Делфи 7 для управлением БД (на Access). Управление это значит, добавить запись, удалить запись. Сортировка этих записей (по дате). И вывод отчетов.
На Access накидал базу из 3 таблиц.
В делфи открыл новый проект, связал БД с проектом через АДО. На форму кинул Дбгрид, а даже что-то отображается из базы.
Кинул кнопки добавить записи и кнопку отчеты.
И застопорился.
Понятно что при нажатии на Добавить записи, должно открываться новое окно с полями, куда ввожу данные. Потом эти данные должны попасть в соответствующие поля в БД Access.

Прогу хочу принципиально написать самостоятельно, т.к. потом надо рассказывать как делал.
Если кто разжует - спасибо.


да все просто там, советую не пользоваться готовыми компонентами а все вручную писать (мое ИМХО, если собираетесь дальше учиться программировать, получите хороший скилл), будет время - помогу


 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Спасибо хоть кто-то ответил.
Программирование это точно не мое. Понял уже давно. Но делать нечего надо писать как-то.
Немного начал ковырять. Затык в том, что добавил кнопки необходимые, компилю - пишет
[Fatal Error] Unit1.pas(7): Circular unit reference to 'Unit1'


 

Junior
Статус: Не в сети
Регистрация: 30.09.2013
fandnb писал(а):
Спасибо хоть кто-то ответил.
Программирование это точно не мое. Понял уже давно. Но делать нечего надо писать как-то.
Немного начал ковырять. Затык в том, что добавил кнопки необходимые, компилю - пишет
[Fatal Error] Unit1.pas(7): Circular unit reference to 'Unit1'


Возможно ты в модуле Unit1.pas написал Uses Form1, или что-то типо того, указано что ошибка в 7 строке Unit1.pas , пришли ее сюда


 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Прикрепил Unit1.pas


У вас нет необходимых прав для просмотра вложений в этом сообщении.


 

Junior
Статус: Не в сети
Регистрация: 30.09.2013
fandnb писал(а):
Прикрепил Unit1.pas


короче давай сюды весь проект вместе с БД и примерным заданием, тебе срочно это все?


 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Villain88 писал(а):

короче давай сюды весь проект вместе с БД и примерным заданием, тебе срочно это все?

Срочности пока нет. Месяц есть.
Приложил архив с проектом и БД. Только скорее всего там база не подключится. Надо менять будет путь.

Приложил фото- нарисовал проект.

Вносим дефект (заполняем поля) все это записывается в mdb, в нужные нам поля. Автоматически к новой записи Приписывается дата/время. (Что б вручную не вводить)

Смотрим отчеты. Все дефекты (записи) за определенный день, смену или по ФИО оператора.

Кнопка диаграммы. Диаграмма Фамилии. Видим кружок с секторами у кого больше/меньше дефектов.
Собстно все.


У вас нет необходимых прав для просмотра вложений в этом сообщении.


 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Кое чего поднаписал, поэтому обновлю архив.
Сейчас пытаюсь сделать что б при нажатии кнопки ОК (в форме добавить дефект в базу) все что я заполнил ушло в базу в нужные поля и еще приписалась дата/время.


У вас нет необходимых прав для просмотра вложений в этом сообщении.


 

Junior
Статус: Не в сети
Регистрация: 30.09.2013
fandnb писал(а):
нет

на новогодних праздниках возможно время будет, щас просто некогда, вообще нагуглить можно неплохие уроки по этому делу..) дерзай


 

Member
Статус: Не в сети
Регистрация: 21.01.2010
Откуда: ... и куда ...
А можно тупо непринципиальный вопрос - зачем на Дельфи? Или именно в этом задача состоит?
Просто по нынешним временам и требованиям я бы совсем другую среду и язык выбирал для "втыкания" в программирование...

_________________
Если на узкой лесной тропе вам повстречался медведь, не теряйтесь, сразу бейте его по морде обгаженными трусами.


 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Да, можно было и другой язык выбрать.
В институте нам 'давали' делфи, поэтому решил на нем писать.
А какой бы Вы посоветовали ?


 

Member
Статус: Не в сети
Регистрация: 21.01.2010
Откуда: ... и куда ...
fandnb, по нынешним временам либо Java (в первую очередь), либо C#, а если хочется серьезно закопаться, то С++. Но никак не паскаль/дельфи, ибо они уже потеряли свою актуальность и используются сейчас только "поскольку-постольку", софт то надо поддерживать написанный и развивать, если нет возможности с нуля заказать.

_________________
Если на узкой лесной тропе вам повстречался медведь, не теряйтесь, сразу бейте его по морде обгаженными трусами.


 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Ну в принципе я так и предполагал что Вы предложите Яву )
Но выбор уже сделан, почти половина "проекта" написана, надо двигаться дальше!


 

Member
Статус: Не в сети
Регистрация: 21.01.2010
Откуда: ... и куда ...
fandnb, глупо изучать отмирающий язык программирования, имхо. В дальнейшем практически не пригодится, а время будет зря потеряно.
Но, как говорится, хозяин - барин ;)

_________________
Если на узкой лесной тропе вам повстречался медведь, не теряйтесь, сразу бейте его по морде обгаженными трусами.


 

Member
Статус: Не в сети
Регистрация: 17.07.2005
БД для диплома это очень плохой выбор.


 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Да Дело в том, что у меня был выбор без выбора )


 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Коллеги, подскажите - сделал фильтр, что б фильтровать записи в базе по нескольким полям /условиям.
Вот код
procedure TForm6.btn2Click(Sender: TObject);
begin
Form1.tbl1.Filtered:=false;
Form1.tbl1.filter:='Оператор = '+QuotedStr(edit1.text)+' AND Дата = '+QuotedStr(edit2.text)+' AND Гайковерт = '+QuotedStr(edit3.text); // сложный фильтр
Form1.tbl1.Filtered:=true;

end;


Фильтр не работает. Прога компилится, фильтр Фамилия+дата выдает пустую строку/запись
Фильтр Фамилия +гайковерт выдает ошибку Несовпадение типов

Гайковерт и Фамилия это текстовый тип. Дата это Дата/Время
Срабатывает только если я заполняю все 3 поля. Но меня это не устраивает.


 

Member
Статус: Не в сети
Регистрация: 21.01.2010
Откуда: ... и куда ...
fandnb писал(а):
Срабатывает только если я заполняю все 3 поля. Но меня это не устраивает.

Само собой, при таком построении запроса оно и будет срабатывать, если только все 3 параметра указаны.
Надо раздельно проверять каждое из условий, и только если оно не пустое, добавлять к строке фильтра.
Накидаю примерно код, без паскальности или еще чего, просто для понимания:
Код:
string query = "";
if (formCondition1 != "")
 query = "Cond1 = " +  formCondition1;
if (formCondition2 != "")
{
 if (query != "")
  query = query + " AND "
 query = query + " Cond2 = " +  formCondition2;
}
if (formCondition3 != "")
{
 if (query != "")
  query = query + " AND "
 query = query + " Cond3 = " +  formCondition3;
}

Как-то так...

_________________
Если на узкой лесной тропе вам повстречался медведь, не теряйтесь, сразу бейте его по морде обгаженными трусами.


 

Member
Статус: Не в сети
Регистрация: 19.08.2004
Откуда: Sankt-Peterburg
Спасибо, уже разобрался с фильтром. Точнее мне написали. Теперь диаграммы добиваю.
Вообще уже виден свет в конце тоннеля.


Показать сообщения за:  Поле сортировки  
Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 19 
-

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  

Лаборатория














Новости

Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB | Kolobok smiles © Aiwan