Sujet Précédent Sujet Suivant

UFMOD

Résolu
KaFarD Messages postés 38 Date d'inscription mercredi 12 mars 2003 Statut Membre Dernière intervention 29 mai 2008 - 19 juin 2007 à 15:53
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 20 juin 2007 à 14:47
Bonjour,

je viens de poster un source concernant l'utilisation de la librairie UFMOD dans VB
toutefois je n'arrive pas à utiliser la fonction XM_FILE ou encore XM_RESSOURCE
( http://www.vbfrance.com/code.aspx?ID=43181 )

Quelqu'un à réussi ? ou un exemple fonctionnel à donner ?

Merci  d'avance

8 réponses

Réponse 1 / 8
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
20 juin 2007 à 07:34
le fichier Link.exe a été supprimé du zip, faut le renommer si tu veux que l'on puisse t'aider malgré tout


j'ai recupéré l'Exe du zip sur sourceforge...


mode WimMM  testé et compilé nikel...
mode DirectX testé également fonctionne...


reste a tester avec le mode file ^^ surement une histroire de passage de parametres
le XM_MEMORY fonctionne nikel aussi...



Sub
Main()
Dim sBuffer As String
Dim pMem() As Byte
Dim nLength As Long
       sBuffer = App.Path & "\mini.xm"
       
       Open sBuffer For Binary Access Read As #1
       nLength = LOF(1)
       ReDim pMem(nLength)
       Get #1, , pMem
       Close #1
       
       If uFMOD_PlaySong(VarPtr(pMem(0)), nLength, XM_MEMORY) <> 0 Then
               ' Pop-up a message box to let uFMOD play the XM till user input
               MsgBox "uFMOD ruleZ!", vbOKOnly, "Visual Basic"

               ' Stop playback
               uFMOD_PlaySong 0, 0, 0
       End If
End Sub<hr />,

----

By Renfield
pourquoi cette transformation ? tout simplement parce que VB stocke les chaines en Unicode, et qu'il n'est pas géré par la lib XM...
donc après avoir testé l'envoi de ma chaine direct, j'ai testé en la convertissant en ASCII ^^

voilà, probleme régle... libre a toi de faire des fonction qui warpent ces appels, tant qu'au final ca appelle ufMOD_Playsong, pas de soucis...

(genre PlaySongFromFile ( Byref vsFileName As String)...)

Renfield
Admin CodeS-SourceS- MVP Visual Basic
3
Réponse 2 / 8
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
20 juin 2007 à 11:40
pas de soucis, ca m'a occupé une petite demi heure ce matin...

si tu as des sons a jouer souvent, le mode memory peut etre a favoriser, tu gardes tout en mémoire une fois, pas besoin d'ouvrir fermer le fichier sans cesse...

Renfield
Admin CodeS-SourceS- MVP Visual Basic
3
Réponse 3 / 8
KaFarD Messages postés 38 Date d'inscription mercredi 12 mars 2003 Statut Membre Dernière intervention 29 mai 2008
20 juin 2007 à 12:32
petite info aussi, je viens de bloquer sur un truc....

IL NE PAS COMPILER EN P-CODE Sinon cela ne fonctionne PAS !
3
Réponse 4 / 8
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
20 juin 2007 à 07:25
Pas confondre dépot de sources et forum, Merci !


> Ce code utilise une librairie GRATUITE: UFMOD ( http://ufmod.sourceforge.net/ )
> Ce code correspond a l'exemple prensent dans l'archive d'origine.
>
> 2 Rendus possibles, par WinMM ou DirectX
>
> Toutefois, cette exemple utilise une ressource ( .RES ) du fichier à lire
> mais je n'arrive pas à utiliser le mode: XM_FILE ou encore XM_MEMORY...
>
> pour info sur des question posé sur l'application XM_MEMORY en VB:
> http://sourceforge.net/forum/forum.php?thread_id=1738942&forum_id=533992
>
> Bref si quelqu'un à une idée....
>
> a+
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 8
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
20 juin 2007 à 09:37
qu'avais tu essayé, comme code ?

Renfield
Admin CodeS-SourceS- MVP Visual Basic
0
Réponse 6 / 8
KaFarD Messages postés 38 Date d'inscription mercredi 12 mars 2003 Statut Membre Dernière intervention 29 mai 2008
20 juin 2007 à 11:18
Grand merci a toi
et bien j'y été presque

car j'avais tester la meme chose que toi sauf l'utilisation des fonctions:
StrConv
StrPtr
VarPtr

que je ne connais pas :-P

bref, pour la version XM_MEMORY j'avais ouvert en binaire mon fichier et converti chaque caractere en hex(asc(x))... et apres pour le traitement je galeré ....

Donc grand MERCI !!!!
0
Réponse 7 / 8
KaFarD Messages postés 38 Date d'inscription mercredi 12 mars 2003 Statut Membre Dernière intervention 29 mai 2008
20 juin 2007 à 11:46
Ah ok !!! merci de l'info ;-)
0
Réponse 8 / 8
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
20 juin 2007 à 14:47
normal ^^

le Link va patcher les adresse mémoiers etc...
en P-Code, "l'exe" est simplement interpreté, plus la même mécanique en interne :p

mais tu fais bien de le mentionner néanmoins

Renfield
Admin CodeS-SourceS- MVP Visual Basic
0
Rejoignez-nous