MonitorEventHandler Delegate

In This Topic

Represents the method that will handle the TraceEvent event of the DbMonitor class.

Syntax

Visual Basic
C#

'Declaration
 
Public Delegate Sub MonitorEventHandler( _
   ByVal sender As Object, _
   ByVal e As MonitorEventArgs _
)

public delegate void MonitorEventHandler( 
   object sender,
   MonitorEventArgs e
)

Parameters

sender: The source of the event.
e: The MonitorEventArgs object that contains the event data.

Remarks

When you create a MonitorEventArgs delegate, you identify the method that will handle the event. To associate the event with your event handler, add an instance of the delegate to the event. The event handler is called whenever the event occurs, unless you remove the delegate. For more information about event handler delegates, see "Events and Delegates" in the .NET Framework SDK documentation.

Example

The following sample shows how to enable and disable monitoring of database activity in your application.

csharp

static void OnEvent(object sender, MonitorEventArgs e)
{
  if (e.TracePoint==MonitorTracePoint.BeforeEvent)
  {
    Console.WriteLine("Description: " + e.Description);
    Console.WriteLine(" Extra info: " + e.ExtraInfo);
  }
}


[MTAThread]
static void Main(string[] args)
{
  MailChimpConnection mailchimpConn = new MailChimpConnection(
      "api key=8b10fe893c9732d12befe0b7d846ffcb-us10;");
  MailChimpMonitor mailchimpMonitor = new MailChimpMonitor();
  mailchimpMonitor.TraceEvent += new MonitorEventHandler(OnEvent);
  mailchimpMonitor.IsActive = true;
  MailChimpCommand mailchimpCommand = new MailChimpCommand("select count(*) from Folders",mailchimpConn);
  mailchimpConn.Open();
  Console.WriteLine(mailchimpCommand.ExecuteScalar());
  mailchimpConn.Close();
  mailchimpMonitor.TraceEvent -= new MonitorEventHandler(OnEvent);
  Console.ReadLine();
}

Visual Basic

Sub OnEvent(ByVal sender As Object, ByVal e As MonitorEventArgs)
  If e.TracePoint = MonitorTracePoint.BeforeEvent Then
    Console.WriteLine("Description: " & e.Description)
    Console.WriteLine(" Extra info: " & e.ExtraInfo)
  End If
End Sub

<MTAThread()> _
Sub Main()
  Dim mailchimpConn As MailChimpConnection = New MailChimpConnection( _
      "api key=8b10fe893c9732d12befe0b7d846ffcb-us10;")
  Dim mailchimpMonitor As MailChimpMonitor = New MailChimpMonitor
  AddHandler mailchimpMonitor.TraceEvent, AddressOf OnEvent
  mailchimpMonitor.IsActive = True
  Dim mailchimpCommand As MailChimpCommand = New MailChimpCommand("select count(*) from Folders", mailchimpConn)
  mailchimpConn.Open()
  Console.WriteLine(mailchimpCommand.ExecuteScalar())
  mailchimpConn.Close()
  RemoveHandler mailchimpMonitor.TraceEvent, AddressOf OnEvent
  Console.ReadLine()
End Sub

Reference

MonitorEventHandler Members
Devart.Common Namespace

Send Feedback