'
' OutputDebugString - Send a string to the system debugger (if any)
'
' Author: Joe Strazzere
'
' This is particularly useful when used in conjunction with
' the DebugView tool from SysInternals:
' http://www.sysinternals.com/Utilities/DebugView.html
'
' If you do use a remote debugger (like DebugView), don't check if the debugger is present.
'
ret=External("kernel32","IsDebuggerPresent")
If ret<> 0 then
External("kernel32","OutputDebugStringA","Hello debugger!")
Else
MsgBox("No debugger found!")
EndIf
