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

Вниз

Присваивание из базы   Найти похожие ветки 

 
Demon ltd   (2002-02-21 23:26) [0]

Поскажите плз.
Чтобы в Edit"е отображалась дата из DateTimePicker"а я пишу:
edit1.text:=DateTimePicke.date.
А как сделать, чтобы присвоенная мною дата в Edit"е опять
показывалась в DateTimePicker"е.
И ещё. У меня есть на форме Edit и DateTimePicker. Когда я пишу в Edit"е
и выбираю дату в DateTimePicker"е, нажимаю на кнопку и данные
вносятся в таблицу. Вот так:
table1.append;
table1["fam"]:=edit1.text;
table1["datarojd"]:=DateTimePicke.date;
table1.post;
А если например я уберу из кода table1["datarojd"]:=DateTimePicke.date
(такое присвоение мне надо сделать после, а не сейчас) и
привяжу к методу Dbgreed"а на щелчок по нему
edit1.text:=table1["fam"];
DateTimePicke.date:=table1["datarojd"];
А так как у меня в таблице поле datarojd пустует, то выдаётся ошибка.
Что мне надо приписать к DateTimePicke.date:=table1["datarojd"], чтобы
ошиба не выдавалась. Если datarojd занято датой, то присвоение происходит.
Что мне надо написать, чтобы всё получалось.
Заранее благодарен.


 
Mike_Goblin ©   (2002-02-22 09:40) [1]

1.Показать дату из Edit в DateTimePicker
DateTimePicker1.Date:=StrToDate(Edit1.Text);
2. Используй перед присваиванием метод IsNULL объекта TField, чтобы узнать содержит ли поле значение


 
Константин   (2002-02-22 11:40) [2]

Должно работать
DateTimePicke.date := table1.fieldbyname("datarojd").AsDateTime;
если в поле пусто, то получишь 1899 год



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
1-66819
kserg@ukr.net
2002-03-06 15:28
2002.03.21
Как задать ссылку на объект MDIChild-формы?


4-67042
BOPOH
2002-01-22 19:39
2002.03.21
Помогите мне дураку разобраться...


14-66969
Tosov
2002-02-06 17:21
2002.03.21
Сколько стоит час работы


3-66749
DimDim
2002-02-20 16:53
2002.03.21
Интернет база MySQL + Delphi 5


14-67005
Alex12
2002-02-08 15:24
2002.03.21
Laptop или обычный PC?