VB/VB.Net Lecteur D2oManager

Inscrit
7 Avril 2010
Messages
151
Reactions
2
#21
Je voudrais bien test mais item.text c'est quoi ? c'est une textbox que tu à pris ou autres ?
Si je fait un simple copier coller j'ai ceci comme erreur :
La propriété 'Text' est 'ReadOnly'.
 
Inscrit
7 Avril 2010
Messages
151
Reactions
2
#22
Même en modifiant en Tabutilisateur.ChatBot.text = tabutilisateur.chatbox.text.replace("%",parameters(i))
Sa reste bloquer sur le messages c'est surement du au InvokeRequired
 

ToOnS

Membre Actif
Inscrit
8 Avril 2009
Messages
974
Reactions
0
#23
dim aEcrire as string = Item.text
For i = 1 To tim.parameters.Count ' ca commence a 1 pas a 0
aEcrire = aEcrire.replace("%" & i,parameters(i-1))
Next
SetChat("[D.] " & aEcrire & vbCrLf)
 
Inscrit
7 Avril 2010
Messages
151
Reactions
2
#24
Humm je reste bloquer car si je regarde dans l'espion sa me donne encore ceci : [D.] Précédente connexion sur ce compte : %3/%2/%1 à %4:%5
 

ToOnS

Membre Actif
Inscrit
8 Avril 2009
Messages
974
Reactions
0
#25
mets un espion sur aEcrire :p

Case TextInformationMessage.ProtocolID
Dim tim As New TextInformationMessage
tim.Deserialize(Content)
Dim item As InfoMessage = _manager.ReadIndex(D2oManager.D2o.D2oFileEnum.InfoMessages, tim.msgType.ToString * 10000 + tim.msgId.ToString)
dim aEcrire as string = Item.text
For i = 1 To tim.parameters.Count ' ca commence a 1 pas a 0
aEcrire = aEcrire.replace("%" & i,parameters(i-1))
Next
SetChat("[D.] " & aEcrire & vbCrLf)
 
Inscrit
7 Avril 2010
Messages
151
Reactions
2
#26
Merci sa marche avec celui ci.
Merci c'est résolue,
Merci d'avoir pris le temps de m'aider
 
Haut Bas