bcb 2009, variant -> TDateTime

Bonjour,
ce code fonctionnait dans tous les bcb<=6 (avec dte étant une colonne Date/heure en db):

Citation:

---

TQuery * ds;
TDateTime dt;
dt=(TDateTime) ds->FieldValues["DTE"];

---

En bcb 2009, il refuse de le compiler!
([BCC32 Error] Unit6.cpp(20): E2015 Ambiguity between '_fastcall System::TDateTime::TDateTime(const System::TDateTime &) at c:\program files\codegear\rad studio\6.0\include\vcl\systdate.h:44' and '_fastcall System::TDateTime::TDateTime(const double) at c:\program files\codegear\rad studio\6.0\include\vcl\systdate.h:45)

Citation:

---

dt=TDateTime(ds->FieldValues["DTE"]);

---

plante avec la même erreur.

Citation:

---

dt=ds->FieldValues["DTE"];

---

plante aussi ever une autre erreur:
[BCC32 Error] Unit6.cpp(20): E2015 Ambiguity between '_fastcall operator System::TDateTime::=(const System::TDateTime &) at c:\program files\codegear\rad studio\6.0\include\vcl\systdate.h:58' and '_fastcall operator System::TDateTime::=(const double) at c:\program files\codegear\rad studio\6.0\include\vcl\systdate.h:60'


Quelqu'un sait comment lui faire convertir un variant en TDateTime?

Hello,

Pour le variant, je ne sais pas, mais est-ce que ceci ne ferait pas l'affaire ?

Code:

---

TDateTime dt=ds->FieldByName("DTE")->AsDateTime;

---

Ceci compile:

Code:

---

1 2 3 4 5

TQuery * ds; TDateTime dt1 =(double)ds->FieldValues["DTE"]; TDateTime dt2; dt2 = (double)ds->FieldValues["DTE"]; TDateTime dt3 = ds->FieldValues["DTE"];

---

Ca ne marche peut-être pas, mais au moins ça compile ;)