PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → Je ne trouve pas comment piloter cette dll
Je ne trouve pas comment piloter cette dll
Iniciado por robins, set., 26 2005 10:39 AM - 2 respostas
Publicado em setembro, 26 2005 - 10:39 AM
Bonjour,

Pour un projet domotique, je cherche a piloter une kit interface usb K8055 de la societe Velleman.

Ce kit est livré avec la K8055D.DLL grace a laquelle je drevrais reussir a piloter la carte.

Seulement , apres avoir charger ma dll , aucune des fonctions de pilotage de dll que j'ai pu trouver dans l'aide ne fonctionne.

La dll ce trouve ici -> http://www.velleman.be/downloads/files/Downloads/K8055_DLL_REV3.zip

Les procedures de la dll ->
http://www.velleman.be/downloads/0/user/Usermanual_K8055_DLL_UK.pdf

est ce que windev peut fonctinner avec ce type de dll ?

Merci d'avance pour vos suggetions .
Publicado em setembro, 26 2005 - 11:46 AM
Avec Scanbin j'ai vérifié
Fonctions exportées : E:\Velleman\K8055D.dll
============================================
0 SetCounterDebounceTime
1 ResetCounter
2 ReadCounter
3 ReadAll
4 ReadAllDigital
5 ReadDigitalChannel
6 SetAllDigital
7 SetDigitalChannel
8 ClearAllDigital
9 ClearDigitalChannel
10 WriteAllDigital
11 SetAllAnalog
12 SetAnalogChannel
13 ClearAllAnalog
14 ClearAnalogChannel
15 OutputAllAnalog
16 OutputAnalogChannel
17 ReadAllAnalog
18 ReadAnalogChannel
19 CloseDevice
20 OpenDevice

DONC A TESTER... mais je n'ai pas la carte donc !!!
hDLL, Connexion, vCpt1 sont des entiers
Dll est une chaîne

Dll = "E:\Velleman\K8055D.dll"
hDLL = ChargeDLL(Dll)
IF hDLL=0 THEN
Erreur("Chargement dll impossible")
RETOUR
ELSE
Info("Dll chargée en mémoire.")
END

Connexion = AppelDLL32(Dll,"OpenDevice",0)
IF Connexion=-1 THEN
Erreur("Carte non trouvée..")
RETOUR
ELSE
Info("Connexion ouverte...")
END

// Lecture du compteur N°1
vCpt1 = AppelDLL32(Dll,"ReadCounter",1)

Info(vCpt1)


// Fermeture
AppelDLL32(Dll,"CloseDevice")
DéchargeDLL(hDLL)
Publicado em setembro, 26 2005 - 12:16 PM
Un grand grand merci.

J'avais pourtant testé de nombreuse fois la fonction AppelDLL32 sans resultat.

Encore une fois un grand merci pour votre aide.