File ›› Write_Data

Write_Data

構文

Write_Data(Hfile, @buffer, Lenght)

Sub Write_Data(ByVal Handle As handle, ByVal pAddress As Any Ptr, ByVal Lenght As Long)

説明

2番目のパラメータで指定されたバッファから、3番目のパラメータで指定された必要量のデータを、書きます。

オプション

Hfile - ファイル・ハンドル

@buffer - バッファアドレス

Lenght - 書き込むバイト数

プラットホーム

Windows , Linux

例:

#Include "window9.bi"
Dim adf(100) As Integer
For a As Integer=0 To 100
  adf(a)=a
Next
Var handle=Create_File("例.txt")
If handle Then
  Write_Data(handle,@adf(0),404)
EndIf
Close_file(handle)
handle=Read_file("例.txt")
If handle Then
  Var ff=Read_DataA(handle,Size_File(handle))
  For a As Integer=1 To Size_File(handle)
    ? Peek(Byte,ff);
    ff+=1
  Next
EndIf
Close_file(handle)
sleep

http://mneniya.ucoz.ru/