File ›› Size_File

Size_File

構文

Size_File(Handle)

Function Size_File(ByVal fileHandle As HANDLE) As Integer

説明

ファイルのサイズ（バイト数）を返します。

オプション

Handle - ファイル・ハンドル

プラットホーム

Windows , Linux

例:

#Include "window9.bi"

Dim As Byte Ptr data_
Var handle=Create_File("例.txt")
If handle<>-1 Then
  Write_String(handle,"FreeBasic a good programming language")
EndIf
Close_file(handle)
handle=Read_file("例.txt")
If handle<>-1 Then
  data_=Read_DataS(handle,Size_File(handle))
  ? PeekS(data_)
EndIf
Close_file(handle)
DeAllocate(data_)
sleep

http://mneniya.ucoz.ru/