Changeset 522 for trunk/ab5.0/ablib/src/basic/dos_console.sbp

Timestamp:

Jun 21, 2008, 3:59:30 PM (17 years ago)

Author:

OverTaker

Message:

Console.Writeを実装。TextWriter.Synchronizedは実装してません。

File:

• trunk/ab5.0/ablib/src/basic/dos_console.sbp (modified) (2 diffs)

trunk/ab5.0/ablib/src/basic/dos_console.sbp

@@ -9 +9 @@
 Dim _System_hConsoleOut = GetStdHandle(STD_OUTPUT_HANDLE)
 Dim _System_hConsoleIn = GetStdHandle(STD_INPUT_HANDLE)
+System.Console.SetOut(
+     System.IO.TextWriter.Synchronized(New System.IO.StreamWriter(
+        New System.IO.FileStream(_System_hConsoleOut, System.IO.FileAccess.Write, False))))
 System.Console.SetIn(
     System.IO.TextReader.Synchronized(New System.IO.StreamReader(
@@ -57 +60 @@
 
     Dim dwAccessBytes As DWord
-    WriteConsole(_System_hConsoleOut, buf.StrPtr, buf.Length, dwAccessBytes, 0)
+    System.Console.Write(buf)
+'   WriteConsole(_System_hConsoleOut, buf.StrPtr, buf.Length, dwAccessBytes, 0)
 End Sub
 /* TODO: _System_GetUsingFormatを用意して実装する