Category:
Xojo
Xojo のメソッド/イベントコールの直前に関数を inject するための小さなモジュール xojo-call-tracer を書いた。ちょっと筋悪ですが。
デフォルトではコールされた関数名をログに吐く関数が inject されるようになっていますが、例えば以下のようなコードに書き換えれば Thread ID やタイムスタンプを合わせて出力するなど、いろいろ使えます。
デフォルトではコールされた関数名をログに吐く関数が inject されるようになっていますが、例えば以下のようなコードに書き換えれば Thread ID やタイムスタンプを合わせて出力するなど、いろいろ使えます。
Sub Trace(methodName As String)
Dim d As New Date()
Dim t As Thread = App.CurrentThread
Dim tId As String = If(t = Nil, "0", Str(t.ThreadID) + "(" + t.DebugIdentifier + ")")
System.DebugLog( _
"[" + d.SQLDateTime + "] <" + tId + "> CALL_TRACE: " + _
methodName + EndOfLine)
End Sub
Comments