ab.com コミュニティ
https://www.activebasic.com/forum/

GetFileSizeの戻り値
https://www.activebasic.com/forum/viewtopic.php?t=2624
ページ 11

作成者:  ベーやん [ 2010年3月04日(木) 18:11 ]
記事の件名:  GetFileSizeの戻り値

GetFileSize()関数の第2引数に NULL を指定して4GByte以上のファイルに

アクセスした場合、「戻り値」は、常に-1(&hffffffff)に成りますか?

4GByte以上のファイルが無くテスト出来ないので宜しくお願いします。

作成者:  HSABP [ 2010年3月05日(金) 00:54 ]
記事の件名: 

エラーにはならない。

4GB以上のファイルが無いとのことだが、自分で作るという発想はないの?
コード:
#console
Dim hFile As DWord, buffer As DWord, count As DWord,writen As DWord

hFile=CreateFile("testfile2", GENERIC_WRITE, 0, ByVal 0, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0)
buffer=malloc(1024*1024)
FillMemory(buffer, 1024*1024, Asc("a"))
For count=0 To 5000
	Locate 0,0:Print count;"/";5000
	WriteFile(hFile,buffer,1024*1024,VarPtr(writen),ByVal 0)
Next
free(buffer)
CloseHandle(hFile)
Print "END"

作成者:  ベーやん [ 2010年3月05日(金) 12:17 ]
記事の件名:  GetFileSizeの戻り値

ありがとう。

ページ 11 全ての表示時間は UTC+09:00 です
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/