delphi 如何将TSQLTimeStamp转换为TDateTime

irlmq6kh  于 2023-01-25  发布在  其他
关注(0)|答案(1)|浏览(176)

我在SQL Server 2008中有一个表,如下所示:

CREATE TABLE B_INTERVENTION ( 
ID_BI INT IDENTITY PRIMARY KEY NOT NULL ,
Date_Creation DATE NOT NULL ,
Cree_Par INT NOT NULL ,
D_Arr BIT NOT NULL ,
Obj_Demarrage DATE NOT NULL ,
Obj_Fin DATE NOT NULL ,
Type_BI CHAR (2) NOT NULL ,
INSPECT INT NOT NULL ,
VERIF INT NOT NULL ,
Machine VARCHAR (13) NOT NULL ,
Priorite INT NOT NULL ,
Date_Fin_Trav DATETIME NULL ,
Commentaire VARCHAR(80) NULL
)
GO

当我尝试将Date_Fin_Trav的值设置为TDateTimePicker时,我在这一行中得到一个错误:

DateTimePicker1.DateTime := FDTable1Date_Fin_Trav.Value;

错误:
[Dcc32错误]单元1.pas(53):E2010不兼容的类型:"TDateTime"和"TSQLTimeStamp"
所以我将代码更改为:

DateTimePicker1.DateTime := TimeStampToDateTime( FDTable1Date_Fin_Trav.Value);

由于Type
[Dcc32错误]单元1.pas(53):E2010不兼容的类型:"TTimeStamp"和"TSQLTimeStamp"
所以我的问题是:如何将TSQLTimeStamp转换为TDateTime

g2ieeal7

g2ieeal71#

Data.SqlTimSt为单位使用SQLTimeStampToDateTime()函数:
将TSQLTimeStamp值转换为TDateTime值。

相关问题