Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Из DataTimePicker вставляется в поле не только дата, но и время [D7, XP]


andzav ©   (2009-06-03 14:12:00) 

На свойство OnChange компонента DateTimePicker я прописал процедуру
procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
dela.Show;
datamodule17.ADOTable14.Edit;
datamodule17.ADOTable14.Insert;
datamodule17.ADOTable14Data.Value:=DateTimePicker1.Date;
end;
Он вставляет дату в поле, но вместе со временем! БД подключена к Access, через ADO Connection. Тип поля - краткая дата. Как обрезать время?
И еще проблема - он вставляет две строки, на одной курсор, а другая пустая, только с заполненным полем Дата. Как от этого избавиться???!!!


Медвежонок Пятачок   (2009-06-03 15:41:00) [1]

Ссылка не открывается!

Сильнее нажимай.


andzav   (2009-06-03 15:30:00) [2]

> Читать до полного и окончательного просветления: http://ln.
> com.ua/~openxs/articles/smart-questions-ru.html
Ссылка не открывается!


> > нам (начинающим)Что-то я тут "начинающего" не вижу, какой-
> то халявщик пробегающий за зачётом.
Сам ты холявщик!  Я зачеты все давно сдал! Просто поинтересоваться решил! А вы тут как ПЕТУХИ накинулись!

> Вы - Николай второй?
Как остроумно! Щас об стену убьюсь от смеха! Просто почитайте ваши ответы, везде подколы!!!!


andzav   (2009-06-03 15:27:00) [3]

> Читать до полного и окончательного просветления: http://ln.
> com.ua/~openxs/articles/smart-questions-ru.html
Ссылка не открывается!

> Вы - Николай второй?
Как остроумно! Вы почитайте другие вопросы, и свои ответы! Только шуточки одни!!!!!


Игорь Шевченко   (2009-06-03 15:23:00) [4]

andzav ©   (03.06.09 15:06) [12]

Читать до полного и окончательного просветления:
http://ln.com.ua/~openxs/articles/smart-questions-ru.html


Плохиш   (2009-06-03 15:13:00) [5]


> нам (начинающим)

Что-то я тут "начинающего" не вижу, какой-то халявщик пробегающий за зачётом.

> Мыобращаемся

Вы - Николай второй?


Dennis I. Komarov   (2009-06-03 15:10:00) [6]

Читать надо то что пишуть, а не вставать в позу...


andzav   (2009-06-03 15:06:00) [7]

Если Вы не видите -  вкладка называется "Начинающим"!!! Я не крутой специалист, но как человек, могу Вам сказать, что Вы ведете себя по отношению к нам (начинающим) - ОЧЕНЬ ГРУБО! Если Вам лень отвечать - удалите эту вкладку!!!! Я не думаю, что хоть кто-то из Вас, с детства читал книги по Delphi и писал SQL запросы!!! Мы обращаемся к Вам за помощью, а не затем, чтобы Вы над нами смеялись!

<Как страшно жить

Парень, выпрыгни в окно! Мне не нравится, когда надо мной смеются!

Надеюсь Вы не переломились, написав пару острот в мой адрес?!
Всего хорошего, шутники!


Игорь Шевченко   (2009-06-03 14:45:00) [8]

Как страшно жить


Dennis I. Komarov   (2009-06-03 14:45:00) [9]


> Спасибо большое Palladin! Ты единственный помог!

Не уже ли Append помог? :))))


> Я убирал Edit, потом Insert, короче все поочереди! Не помогает!
>  Если оставить только datamodule17.ADOTable14Data.Value:
> =DateTimePicker1.Date;, то измениться последняя запись!

Может надо все-таки почитать?


Медвежонок Пятачок   (2009-06-03 14:44:00) [10]

не хватает таймера. без него ничего не получится


andzav   (2009-06-03 14:37:00) [11]

Спасибо большое Palladin! Ты единственный помог! А может еще как то можно решить проблему с двумя строками??!! Я убирал Edit, потом Insert, короче все поочереди! Не помогает! Если оставить только datamodule17.ADOTable14Data.Value:=DateTimePicker1.Date;, то измениться последняя запись!


Dennis I. Komarov   (2009-06-03 14:29:00) [12]

перевели в режим редактирования, потом вставили запись, потом пытаемся изменить значение поля, по ПОСТ вообще забыли как класс, и все это при каждом изменении в пиккере...

З.Ы. А до какого банана вообще что будет в Access? Главное как показать прочитанное


Palladin   (2009-06-03 14:29:00) [13]

во... точно... про Append ты забыл...


Palladin   (2009-06-03 14:28:00) [14]


> datamodule17.ADOTable14.Edit;
> datamodule17.ADOTable14.Insert;
> datamodule17.ADOTable14Data.Value:=DateTimePicker1.Date;

чего это ты тут налепил? и Edit и Insert... было бы еще методов 15, так наверное их всех бы лупанул... для верности типа...


Медвежонок Пятачок   (2009-06-03 14:27:00) [15]

И еще проблема - он вставляет две строки ....

Это потому, что недостаточно раз написано edit и инсерт.
Надо четыре едита и десять инсертов.
Потом присваивать.
Тогда будет одна строка.


Медвежонок Пятачок   (2009-06-03 14:23:00) [16]

а 00:00:00 это не время что ли?
типа безвременье?
:)


Palladin   (2009-06-03 14:22:00) [17]

datamodule17.ADOTable14Data.Value:=Trunc(DateTimePicker1.Date);


Медвежонок Пятачок   (2009-06-03 14:21:00) [18]

как же в поле "короткая дата" помещается дата и время?
не наводит на мысли, что поле это на самом  дата и время?


Наверх

Титульная страница Поиск, карта сайта Написать письмо