Hello Peter
 
many thanks for your answer.
 
If Ido asyousuggest,the following errorcomeson (NOMETHOD):
-----------------------------------------------------------------------------------------------------------
oError:args         :
          -> VALTYPE: C VALUE: SelectServer
oError:canDefault   : Y
oError:canRetry     : N
oError:canSubstitute: Y
oError:cargo        : NIL
oError:description  : Schwerwiegender Fehler
 
oError:filename     : NIL
oError:genCode      : NIL
oError:operation    : SelectServer
oError:osCode       :          -2147418113
oError:severity     :          2
oError:subCode      :       6500
oError:subSystem    : Automation
oError:thread       :          1
oError:tries        : NIL
-------------------------------------------------------------------------------------
CALLSTACK:
Aufgerufen von AUTOMATIONOBJECT:ONERROR(1344)
Aufgerufen von ASCOMERROR:RAISE(324)
Aufgerufen von ASCOMERROR:RAISEERROR(593)
Aufgerufen von ASCOMERROR:RAISEONERROR(672)
Aufgerufen von AUTOMATIONOBJECT:NOMETHOD(1238)
Aufgerufen von DOATOMICTIME(32)
Aufgerufen von (B)CREATEMDIMENU(1214)
Aufgerufen von APPEXEC(289)
Aufgerufen von MAIN(323)
-------------------------------------------------------------------------------------------------------------------
Willy

 
<Peter Alderliesten> schrieb im Newsbeitragnews:1pa5j97h98ywf$.1gcl5zd8ilat6$.dlg@40tude.net...
> Willy,
>
>> Does anyone have implemented this AtomicClock ActiveX Control in xbase++?
>>http://www.samlogic.net/components/slatomic.htm
>> It is free and can be downloaded!
>
>>        oAtime:SelectServer := 0       // Don´t  work!
>>       // oAtime:ServerType := 0        // Don´t  work!
>>
>>       oATime:ReadTime                  // Don´t  work!
>>       msgbox(oATime:TimeStr")      // Don´t  work!
>
> I assume these don't work because you what call as instance variables are
> specified as methods. You should try this:
> oAtime:SelectServer()
> if oAtime:readTime()
>    cTime := oAtime:TimeStr
> endif
> etc.
>
> Peter
>