Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Update поля с датой типа DateTime, редактирование записи 
:(
    Опции темы
Данкинг
Дата 24.5.2008, 23:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130



Ну а если StrToDateTime заменить на StrToDate ?


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Veniamin
Дата 24.5.2008, 23:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Не получается :( . Та же самая ошибка. А может быть причина в коде при создании самой формы для редактирования? Т.е. если редактирую, чтоб выводились уже существующие поля в Edit-ы.
Вот:
Код

procedure TMainForm.N5Click(Sender: TObject);
begin
  FormModifyData:=TFormModifyData.Create(self);
  FormModifyData.ButtonEdit.Enabled:=true;
 ...
  FormModifyData.EditStatus.Text:=DM.MainTableDSDesigner17.Value;
  FormModifyData.Editdaterepair.Text:=DM.MainTableDSDesigner18.AsString; {дата ремонта}
  FormModifyData.Editzajavka.Text:=DM.MainTableDSDesigner26.Value;
  FormModifyData.ComboBox1.Text:=DM.MainTableDSDesigner27.Value;
  FormModifyData.Editdatezajavka.Text:=DM.MainTableDSDesigner28.AsString; {дата заявки}

  FormModifyData.ShowModal;
end;


Это сообщение отредактировал(а) Veniamin - 24.5.2008, 23:22
PM MAIL   Вверх
Данкинг
Дата 24.5.2008, 23:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130



Тогда функций проверки сделай, как я говорил.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Veniamin
Дата 24.5.2008, 23:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Отредактировал пост выше, может в создании формы причина, когда передаю значение формата дата в Edit как строку (AsString)?

Это сообщение отредактировал(а) Veniamin - 24.5.2008, 23:21
PM MAIL   Вверх
Данкинг
Дата 24.5.2008, 23:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130



Цитата(Veniamin @  25.5.2008,  00:21 Найти цитируемый пост)
когда передаю значение формата дата в Edit как строку (AsString)?

Так ошибка-то на какой строке вылезает? smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Veniamin
Дата 25.5.2008, 00:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Код во втором посте сверху этой страницы привёл как возможную причину, а ошибка вылазит при попытке добавить дату ремонта или дату заявки в коде на предыдущей странице. А стрелка появляется сразу же после ошибки возле строки: FormModifyData.ShowModal; , которая приведена выше во втором посте на этой странице. 

p.s. Действительно ерунда какая-то происходит. Попробовал создать в Access-е базу с единственной таблицей, в которой поля счётчик да дата типа дата. В Delphi кинул на форму всё что нужно для ADO соединения, отобразил таблицу, добавил кнопку на которой событие - добавление записи формата время из Edit1.Text, который находится на этой же форме. Не забыл всё это включить в конструкцию  try...except. Запустил... всё добавляется smile 

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

Это сообщение отредактировал(а) Veniamin - 25.5.2008, 00:27
PM MAIL   Вверх
Данкинг
Дата 25.5.2008, 00:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130



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


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Veniamin
Дата 25.5.2008, 00:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Там столько перелопачивать. smile, а из-за ерунды заново писать код - смерти подобно, время не позволяет. А писал по книге, подобно.  Т.е. динамически создавать форму? У меня все формы так создаются, которые не появляются изначально при запуске программы.

Это сообщение отредактировал(а) Veniamin - 25.5.2008, 00:31
PM MAIL   Вверх
Данкинг
Дата 25.5.2008, 00:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130



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

Цитата(Veniamin @  25.5.2008,  01:30 Найти цитируемый пост)
У меня все формы так создаются, которые не появляются изначально при запуске программы.

А смысл-то в этом какой? Уменьшение размера программы? Дело твоё, конечно, просто это лишняя причина для ошибки.




--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Veniamin
Дата 25.5.2008, 00:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Может быть и в этом причина. На Delphi с базами мало опыта в программировании. :( А Вы можете посмотреть код пожалуйста?
PM MAIL   Вверх
Данкинг
Дата 25.5.2008, 00:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130



Могу, только завтра, сейчас уже в код врубаться неохота. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Veniamin
Дата 25.5.2008, 00:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Хорошо, спасибо. smile smile 
PM MAIL   Вверх
Страницы: (3) Все 1 2 [3] 
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

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

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


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


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

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.

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


 




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


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

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