Changeset 291 for Include/Classes/System/Diagnostics
- Timestamp:
- Aug 15, 2007, 4:24:27 AM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Include/Classes/System/Diagnostics/TraceListener.ab
r290 r291 38 38 39 39 '---------------------------------------------------------------- 40 ' パブリック コンストラクタ40 ' パブリック メソッド 41 41 '---------------------------------------------------------------- 42 42 … … 89 89 End Sub 90 90 91 ' 条件をもとに文字列を出力 92 Sub WriteLineIf( condition As Boolean, value As Object ) 93 If condition Then 94 WriteLine( value ) 95 End If 96 End Sub 97 Sub WriteLineIf( condition As Boolean, message As String ) 98 If condition Then 99 WriteLine( message ) 100 End If 101 End Sub 102 Sub WriteLineIf( condition As Boolean, value As Object, category As String ) 103 If condition Then 104 WriteLine( value, category ) 105 End If 106 End Sub 107 Sub WriteLineIf( condition As Boolean, message As String, category As String ) 108 If condition Then 109 WriteLine( message, category ) 110 End If 111 End Sub 112 91 113 92 114 '----------------------------------------------------------------
Note:
See TracChangeset
for help on using the changeset viewer.