Bonjour
j'aurais besoin d'un coup de main SVP

jai un petit souci pour utiliser une fonction d'un ActiveX (cameraIP) avec windev.
une partie du source en VB :

Private Sub OpenLocation()
Dim vSegs As Variant
Dim VsegList() As Variant

lret = MediaPlayBack1.GetSegmentList(vSegs)
....
VsegList = vSegs
comboSegment.Clear
For i = 0 To UBound(VsegList)
FormatDateTimeValue3D i, 0, VsegList, strTot

FormatDateTimeValue3D i, 1, VsegList, strTot2

strTot = strTot + " ~ " + strTot2
comboSegment.AddItem strTot, i
Next i
....

cette fonction me permet de récupèrer la liste détaillée des enregistrements.
En Windev ça marche pas :
b est un Variant
lret=MediaPlayBack1>>GetSegmentList(b)
j'ai essayé les tableaux,l'oleautomation mais le lret me retourne une erreur à chaque fois.

la doc de la caméra dit :
HRESULT GetSegmentList (Variant *pvList,Long *plRet);

Parameters

pvList
[out] The buffer that holds the returned data. It’s a three-dimension array
(nx2x6 where n is the number of segments).
pvList[n] contains the starting
and ending time of each period. pvList[n][0] contains the starting time of the time segment, the six
elements are long integers for Year, Month, Day, Hour, Minute, Second
for this time. pvList[n][1] contains the ending time of the time segment, the six
elements are long integers for Year, Month, Day, Hour, Minute, Second
for this time.
plRet
[out] the return code of the function. 0 means success, others mean failed

j'arrive à me connecter sur l'activeX,faire un peu tout, mais je bloque sur ce 'variant'
un coup de main serait pas de refus
merci !

Voir du coté de construitVariant

bonjour
merci pour la réponse !
en fait, je me suis rendue compte que ma dll n'était pas à jour !
après ça, i fallait bien utiliser :

lret=autoObjet>>GetSegmentList(construitvariantautomation(ttableau))
merci

Bonjour
la dernière fonction qui marche pas !

HRESULT OnNotifyTime ( ENotifyTimeType eCode;Variant *pvTime )

j'appelle cet evenement par :
//dans code ini de l'activeX
ActiveXEvenement("MD_OnNotify",Mon_ActiveX,"OnNotifyTime")
dans ma fonction MD_OnNotify
//normalement, je devrais mettre ça !
PROCEDURE MD_OnNotify(ecode,construitvariantautomation(pvtime))

mais ça passe pas et impossible de recupèrer les valeurs de pvtime
[in] This parameter contains the time value of notification. For
eNoMatchAtTimePeriod, this is an array contains 12 elements, the fore 6
elements are the starting time (Year, Month, Day, Hour, Minute, Second).
And the latter 6 elements are the ending time. For other notification code, it
always contains 6 elements for the time point to be notified.

comment faire SVP ?
merci

réponse du ST :
Cette syntaxe n'existe pas. La procédure ne peut recevoir la construction d'un variant. Mais simplement un variant.

ConstruitVariantAutomation sert à construire un variant lors du passage de paramètre à un ActiveX pas dans la réception de paramètres. Utilisez simplement :

PROCEDURE MediaPlayBack1_OnNotifyTime(ecode, Vtime)

je n'arrive toujours pas à récupèrer les données du vtime tableau de 6 entiers !
zarbi !

bonjour
à ce jour ce bug n'est toujours pas résolu par le ST!