Inoffizielles deutsches Xbase-Forum

Hallo,
kann mir jemand sagen, wie ich bei ActiveX einem Property einen TimeValue-Wert übergeben kann ?

objRoute.Waypoints.Item(1).PreferredDeparture = TimeValue("8:00:00 AM")

Hallo Wolfgang,
keine Ahnung - ich habe nur das hier gefunden in der ActiveX-Newsgroup:

Andreas Herdt hat geschrieben:A new method will be introduced
AutomationObject:treatDateAsString( .T. | .F. ) // default .F.

If .T. is set then the date will be returned as character string
in the following syntax:

"YYYYMMDDHHMMSS"

Das war im März 2006...

Viele Grüße,
Martin

Danke Martin,
das habe ich auch schon einmal benötigt, hilft mir aber bei diesem Problem nicht weiter.

Hallo,
falls es auch jemand mal (z.B. für Mappoint) benötigt (Lösung aus Alaska Newsgroup):

Code: Alles auswählen

#include "activex.ch"

sDateTime:=dtos(date())+time()
objRoute:Waypoints:Item(1):treatDateAsString(.T.):setProperty("PreferredDeparture", 
VTType():new( sDateTime, VT_DATE))

Das funktioniert bei mir:

Code: Alles auswählen

* cMyDate ist ein Datum
* cMyTime ist eine Zeit in der Form HH:MM
oMap:activeRoute:DriverProfile:StartTime := Dtos(cMyDate)+Strtran(cMyTime+":00",":","")

Na toll, das sagst du jetzt....

Hauptsache es funktioniert jetzt.