Valeur Alphabetique retourné pâr une dll

LOULOU25 · Message par **LOULOU25** » ven. 10/sept./2004 15:05

Comment faire pour récuperer une valeur alphabétique retourné par une fonction dans une dll , pure basic ne retournant que des valeurs numérique. ?
Un exemple de programmation concret m'aiderait beaucoup a avancer.
Merci par avance

kelly · Message par **kelly** » ven. 10/sept./2004 15:15

une valeur alphabetique ?... donne un exemple pour voir...

Oliv · Message par **Oliv** » ven. 10/sept./2004 15:27

Ne sachant pas si tu as fait la DLL ou pas, je te propose les deux :

Si c'est toi qui fait la DLL, il faut faire

Code : Tout sélectionner

ProcedureDLL Lettre()
  Global Lettre.s
  Lettre = "Voici une chaine de caractères"
  ProcedureReturn @Lettre ; Renvoi le pointeur de la chaine de caractères
EndProcedure

Et pour récupérer dans ton programme

Code : Tout sélectionner

Recuperation.s = PeekS(CallFunction(#Librairie,"Lettre"))
Debug Recuperation

Je pense que lorsque tu n'écris pas la DLL, le deuxième code fonctionne aussi mais je n'ai jamais testé.

Par contre, je n'ai pas testé ce code mais c'est comme ça que je procède (il ce peut qu'il y ai une erreur au niveau du nom d'une procédure

)

Oliv

nico · Message par **nico** » ven. 10/sept./2004 15:35

Il faut que tu saches que les valeurs alphabétiques sont aussi des valeurs numériques, il faut procéder comme Oliv te l'a présenté dans le cas d'une chaîne de caractère retournée par une Dll.

LOULOU25 · Message par **LOULOU25** » ven. 10/sept./2004 15:41

En fait j'utilise une dll que je n'ais pas fabriqué
Un exemple
CallFunction(0,"AU3_WingetTitle","","")
Normalemetn en retour de cette fonction je devrais avoir le nom de la fenetre active mais en fait je n'ais qu'une valeur numérique

nico · Message par **nico** » ven. 10/sept./2004 15:48

Oui, mais toi tu fais comment pour récupérer ta valeur?

LOULOU25 · Message par **LOULOU25** » ven. 10/sept./2004 15:54

Justement je ne sais pas comment faire car si je code comme suit
toto=CallFunction(0,"AU3_WinGetTitle","","")
je recupére une valeur numérqiue dans toto alors que normalemetn il devrait y avoir le titre de la fenetre

nico · Message par **nico** » ven. 10/sept./2004 16:05

et si tu fais toto.s, tu obtiens quoi?

LOULOU25 · Message par **LOULOU25** » ven. 10/sept./2004 16:06

J'obtiens une valeur numérique sur 5 chiffres exemple 15645

nico · Message par **nico** » ven. 10/sept./2004 16:09

C'est bizarre, je ne sais pas et si tu remplace tes chaînes null par 0, ca donne quoi, en gardant toto.s?

nico · Message par **nico** » ven. 10/sept./2004 17:01

J'ai oublié, il te faut au préalable initialiser ta chaîne de caractère pour qu'elle soit capable de recevoir les données, donc on va lui donner une certaine longueur avec space().

En voici un exemple:

Code : Tout sélectionner

;Avec AutoItDLL version v1.11

szTitle.s=Space(100)

If OpenLibrary(0,"AutoitDll")
  CallFunction(0,"AUTOIT_WinGetActiveTitle",@szTitle)
  MessageRequester("info", szTitle)
  CloseLibrary(0)
EndIf

Autre chose importante, avec cette fonction, tu seras obligé de créer un exécutable si tu veux vérifier que ça marche.

J'espère que ça va t'aider!

LOULOU25 · Message par **LOULOU25** » ven. 10/sept./2004 18:16

J'utilise la derniére version de AUTOIT 3.0.103 avec cette version cela ne marche pas Je te joins la DLL si tu veux.

nico · Message par **nico** » ven. 10/sept./2004 19:31

Je l'ai téléchargé mais je n'y arrive pas!

J'ai toujours un message d'erreur!

LOULOU25 · Message par **LOULOU25** » ven. 10/sept./2004 20:10

nico a écrit :Je l'ai téléchargé mais je n'y arrive pas!

J'ai toujours un message d'erreur!

J'ai vu qu'il y avait également un fichier .lib avec un fichier H , représentant également les mêmes fonctions que dans la dll , que peux-ton en faire avec pure basic ?