Jabaco Source

'-Output to console- 
  Debug.Print "Dies ist ein Test" 
'-Output to DebugView- 
  Debug.Output "Dies ist ein Test"

Source code

//-Begin----------------------------------------------------------------
  /**
   * @(#)Debug.java
   *
   * @author Stefan Schnell
   * @version 0.01 09/05/24
   */
  import com.eaio.nativecall.*;
  public class Debug
    {
      static
        {
          try
            {
              NativeCall.init();
            }
          catch (Exception ex)
            {
 
            }
        }
      //-Procedure OutputDebugString------------------------------------
        private static void OutputDebugString(String Text)
          {
            VoidCall OutputDebugStringA = new VoidCall("kernel32.dll", 
              "OutputDebugStringA");
            OutputDebugStringA.executeCall(new Object[] {Text});
            OutputDebugStringA.destroy();
          }
      //-Procedure Output-----------------------------------------------
        public void Output(String Text)
          {
            if (Text.length () > 256)
              {
                Text = Text.substring(0, 256);
              }  
            OutputDebugString(Text);
          }
    
      //-Procedure Print------------------------------------------------
        public void Print(String Text)
          {
            java.lang.System.out.println(Text);
          }
    
  }
//-End------------------------------------------------------------------