Salut
Je cherche un moyen de copier une référence en VB pour ne pas à avoir à faire de la dupplication de code.
En fait je voudrais que la ligne "previewColor = Preview.talkColor.textToPrint.ForeColor" soit comme si je faisait "a = &b" en c++ (en gros si je modifie a, je modifie b en même temps) sachant que je ne veux pas modifier l'en-tête de la fonction color (parce que j'ai déjà duppliqué mon code avant et c'est pas bien) et j'ai trop de lignes à chercher et à modifier (juste 81 ^^)
J'ai essayé le code suivant mais ca ne fonctionne pas :
----
Module Modify
Dim previewColor
As Object
Dim selectorColor
As Object
Public Sub color(
ByVal section
As String,
ByVal r
As String,
ByVal g
As String,
ByVal b
As String)
If section =
"Talk" Then previewColor = Preview.talkColor.textToPrint.ForeColor
selectorColor = configNWN.selectColorTalk.BackColor
ElseIf section =
"Whisper" Then previewColor = Preview.whisperColor.textToPrint.ForeColor
selectorColor = configNWN.selectColorWhisper.BackColor
End If If r <>
"" And g <>
"" And b <>
"" Then previewColor = System.Drawing.Color.FromArgb(255,
CInt(r),
CInt(g),
CInt(b))
selectorColor = System.Drawing.Color.FromArgb(255,
CInt(r),
CInt(g),
CInt(b))
End If ModNWNPINI.EcrireINI(
"Chat Colors", section &
"Color", r &
"," & g &
"," & b)
End SubEnd Module----
Je travaille avec VB 2005 Express Bêta, vu qu'il est gratuit et que j'avais besoin de développer une application rapidement pour Windows
Merci d'avance pour vos réponses