MIDI IN EN VB2005

Commentaire de TeBeCo le 10/07/2007 08:05:03

jeux de caractères :
namespace => System.Text.Encoding
ASCII
Unicode
UTF8
UTF16
Default (celui du systeme probablement l'ANSI sur bcp de pc)


string=>byte :
dim btData() as Byte = system.text.encoding.ascii.getbytes("salut")

byte => string
dim btData() as Byte
...
'remplissage
...
'decodage
dim sData as String = system.text.encoding.ascii.getstring(btdata)


(enfin ya plusieur fonction avec de l'overload a toi de choisir l'encoding qui te correspond ainsi qui les methode les plus approprié
j'espere avoir repondu a ta question sur les "caractère multibytes"

Commentaire de Afyn le 10/07/2007 11:31:55

J'ai testé en remplaçant par la ligne suivante :

MenuItem.Text = System.Text.Encoding.ASCII.GetString(MidiInCaps.ProductName)

C'est par vraiment ça non plus ...

Voilà Product Name :

<MarshalAs(UnmanagedType.ByValArray, SizeConst:=64)> Dim ProductName As Byte()

Normalement c'est une structure de 32 Bytes
Mais avec .NET ça ne fonctionnait pas
J'ai augmenté la structure à 64 Bytes, mais c'est forcément du bricolage...

Merci de votre aide

Afyn
Navedac