Discussion :

[BasicZX81]

Bonjour à tous,
Savez vous si il est possible de réecrire la méthode Writelineif des classes Debug et Trace ?
Le but est de personnaliser les messages sans toucher à la synthaxe d'origine (Trace.Writelineif...etc) J'ai réussi à la faire en partie, c'est à dire que j'ai écrit une classe qui herite de TraceListener, mais le problème c'est que cette classe est un ecouteur et donc formate les messages uniquement à destination de cet ecouteur.
J'aimerais que les mêmes messages formatés soit aussi envoyés vers le fenêtre de debogages de Visual Studio. Les classes Debug et Trace etant NonHeritable, je n'ai pas réussi à écrire une classe qui herite directement de celles-ci et donc il ne me semble pas possible de le faire, pouvez vous confirmer ou m'indiquer une autre solution ?
En remerciant par avance.

[Pol63]

http://msdn.microsoft.com/fr-fr/library/bb384936.aspx

[BasicZX81]

Merci beaucoup pour cette technique que je ne connaissais pas mais malheureusement ca ne fonctionne pas comme je veux.
C'est à dire que je suis obligé de travailler sur une instance de la classe de base pour que la nouvelle méthode puisse être utilisé et donc en clair je ne peux pas utiliser la syntaxe d'origine.

La synthaxe d'origine est du type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Trace.WriteLineIf (condition as boolean, messsage as string)

La nouvelle syntaxe :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim MyTrace1 as Trace
MyTrace1.WriteLineIf(MyDebugSwitch.TraceVerbose, textLog, True) ' Un 3eme paramètre à été ajouté afin que la signature soit différente de la classe de base et pour que la méthode puisse être appellé à la place de la méthode de base

Mon module pour étendre la classe :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Imports System.Runtime.CompilerServices
Module TraceExtensions
    <Extension()>
    Public Sub WriteLineIf(ByVal tc As Trace, ByVal condition As Boolean, ByVal message As String, Optional ByVal Ext As Boolean = Nothing)
        If Ext = True Then
            message = "Mon message formaté 1 = " & message
            Trace.WriteLineIf(condition, message)
        Else
            message = "Mon message formaté 2 = " & message
            Trace.WriteLineIf(condition, message)
        End If
    End Sub
End Module

Ce que je veux faire n'a pas l'air d'être possible. Si vous pouvez me contredire j'en serais ravi, ça fait des mois que je cherche.

[Pol63]

malheureusement je ne vais pas vous contredire
j'avais bien cru comprendre que vous vouliez garder la syntaxe de base et la classe de base et que ca appelle un autre code, mais techniquement ca serait étrange de pouvoir faire ca ^^

il faudra dans tous les cas changer la syntaxe, mais un replace (ctrl+h) doit pouvoir convenir

[BasicZX81]

Bonsoir, oui en effet je voulais garder la syntaxe d'origine. J'en demande peut-être beaucoup mais je pensais que cela devait être faisable. Quoi qu'il en soit merci beaucoup, j'ai appris à étendre les méthodes d'une classe et ça pourra me resservir au besoin. Merci pour la pertinence de votre réponse comme on aimerais en recevoir souvent.

[BasicZX81]

Eureka, j'ai trouvé.
Il faut utiliser la classe TraceSource. Bon c'est vrai je n'avais parler que des classes Debug et Trace mais ca ne me gène pas d'utiliser cette classe. Avec celle-ci je peux réecrire la méthode TraceEvent sans toucher à la syntaxe originale :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim Mysource1 As New TraceSource1("MyTraceSource1")
        Mysource1.TraceEvent(TraceEventType.Verbose, 0, "Mon message")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
<configuration>
  <system.diagnostics>
    <sources >
      <source name ="MyTraceSource1" switchName="MySourceSwitch">
        <listeners>
          <add
               name="MyListener3" 
               type="System.Diagnostics.TextWriterTraceListener"
               traceOutputOptions="DateTime"
               initializeData=".\MyTrace.txt">
          </add>
        </listeners>
      </source>
    </sources>
    		<switches>
                     <add name="MySourceSwitch" value="Verbose"/>
		</switches>
    <trace autoflush ="true" indentsize ="4">
      </trace>
    </system.diagnostics>
</configuration>

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Public Class TraceSource1
    Inherits TraceSource
    Public Sub New(ByVal name As String)
        MyBase.New(name)
    End Sub
    Public Overloads Sub TraceEvent(eventType As System.Diagnostics.TraceEventType, id As Integer, message As String, Optional ext As Boolean = Nothing)
        message = "MyTraceSource1 formaté = " & message
        MyBase.TraceEvent(eventType, id, message)
    End Sub
End Class

A partir de là je peux réecrire et formater mes messages comme je veux, c'est pile ce qu'il me faut y compris dans la fenêtre Visual Studio.