by konisi » 2006年5月21日(日) 16:46
それは元々そういう仕様なので、次のような関数を別途作ってあげる必要があります。
コード: 全て選択
Sub PRINT_ToFile2(FileNumber As Long, buf As String)
Dim dwAccessByte As DWord
FileNumber=FileNumber-1
WriteFile(_System_hFile(FileNumber),buf,Len(buf),VarPtr(dwAccessByte),ByVal NULL)
End Sub
追記
デバッガを走らせてみて初めて、command.sbp内のPRINT_ToFile関数のbufの値に改行コードが添付されている事に気が付いた僕です。
それは元々そういう仕様なので、次のような関数を別途作ってあげる必要があります。
[code]Sub PRINT_ToFile2(FileNumber As Long, buf As String)
Dim dwAccessByte As DWord
FileNumber=FileNumber-1
WriteFile(_System_hFile(FileNumber),buf,Len(buf),VarPtr(dwAccessByte),ByVal NULL)
End Sub[/code]
追記
デバッガを走らせてみて初めて、command.sbp内のPRINT_ToFile関数のbufの値に改行コードが添付されている事に気が付いた僕です。