Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.07.26;
Скачать: CL | DM;

Вниз

Из DataTimePicker вставляется в поле не только дата, но и время   Найти похожие ветки 

 
andzav ©   (2009-06-03 14:12) [0]

На свойство 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 14:21) [1]

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


 
Palladin ©   (2009-06-03 14:22) [2]

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


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

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


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

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

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


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


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

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


 
Palladin ©   (2009-06-03 14:29) [6]

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


 
Dennis I. Komarov ©   (2009-06-03 14:29) [7]

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

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


 
andzav ©   (2009-06-03 14:37) [8]

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


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

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


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

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


 
Dennis I. Komarov ©   (2009-06-03 14:45) [11]


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

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


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

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


 
andzav ©   (2009-06-03 15:06) [12]

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

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

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

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


 
Dennis I. Komarov ©   (2009-06-03 15:10) [13]

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


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


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

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

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

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


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

andzav ©   (03.06.09 15:06) [12]

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


 
andzav ©   (2009-06-03 15:27) [16]

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

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


 
andzav ©   (2009-06-03 15:30) [17]

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


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

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


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

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

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



Страницы: 1 вся ветка

Текущий архив: 2009.07.26;
Скачать: CL | DM;

Наверх




Память: 0.51 MB
Время: 0.018 c
15-1242852156
Германн
2009-05-21 00:42
2009.07.26
Копирование таблицы из pdf в doc


15-1243259541
SkyN
2009-05-25 17:52
2009.07.26
Как поместить программу в "Установка и удаление программ"?


15-1242988527
Gans
2009-05-22 14:35
2009.07.26
Подскажите как называется программа


2-1243513363
night_light
2009-05-28 16:22
2009.07.26
методы Assign и Canvas.Drawобъекта TBitmap


2-1244032588
Pavlov
2009-06-03 16:36
2009.07.26
try except