Вниз
Скачать: CL | DM;

Тип TimeStamp и TSystemTime   Найти похожие ветки 

← →
Дмитрий К.   (2003-09-22 14:12) [0]

Добрый день уважаемые мастера!
Возник небольшой вопрос:
В IB датабазе существует таблица, одно поле которой имеет тип TimeStamp.
Каким образом можно туда занести текущее системное время, день, год.
Функция API GetSystemTime - не подходит, она возвращает параметр типа TSystemTime;
(Хотя, может его можно привести к типу TDateTime ?)


← →
Дмитрий К.   (2003-09-22 14:21) [1]

Что никто не знает ?


← →
stud ©   (2003-09-22 14:25) [2]

а откуда заносить?
тригером или из программы?


← →
Дмитрий К.   (2003-09-22 14:27) [3]

Из программы


← →
stud ©   (2003-09-22 14:33) [4]

и в чем проблема??
зачем тут API?
пишеш sql:
insert .... into .... (DateTime...) values (:date_,...)
и дальше параметру date_присваиваеш date.


← →
stud ©   (2003-09-22 14:35) [5]

пардон date_:=now


← →
Дмитрий К.   (2003-09-22 14:36) [6]

Так значение :_date необходимо откуда то взять !


← →
stud ©   (2003-09-22 14:39) [7]

date это параметр в sql запросе.
а now это фукция которая возвращает время и дату.
смотри
toolsq.Close;
toolsq.SQL.Text:="insert into base_rasp (id,vrach,day_week,st_time,end_time) values(gen_id(new_rasp,1),"+
inttostr(docq.FieldValues["med_rb"])+","+inttostr(i)+",:st,:et)";
toolsq.ParamByName("st").DataType:=ftdatetime;
toolsq.ParamByName("st").Value:=now;
toolsq.ExecSQL;

вот и все.


← →
Deniz ©   (2003-09-22 14:40) [8]

NOW RTFM
Returns the current date and time.
datetime routines
Delphi syntax:

function Now: TDateTime;

Description

Returns the current date and time, corresponding to the sum of the value returned by the global Date and Time functions.

Note: Although TDateTime values can represent milliseconds, Now is accurate only to the nearest second.


← →
Johnmen ©   (2003-09-22 14:41) [9]

>...необходимо откуда то взять !

Функция Date, однако...:)


← →
Дмитрий К.   (2003-09-22 14:59) [10]

Хм..,спасибо, так тросто, что даже стыдно.



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.014 c
14-40669
человек
2003-09-23 14:15
2003.10.13
Кадеты. Помогите найти! Я не нашел про них!!! ПОМИРАЮ!!!


14-40674
Dark Magus
2003-09-23 15:22
2003.10.13
Коллекции пиктограмм


4-40740
VladP
2003-08-07 14:34
2003.10.13
запуск приложения от имени системы или администратора


4-40720
AndreyAs
2003-08-08 11:49
2003.10.13
Handle компонета в другом приложении


3-40232
Abrams
2003-09-24 09:30
2003.10.13
TClientDataSet




   Наверх