admin

[系统应用] 检测文件大小

FileHandle := FileOpen(Application.ExeName, 0);

//ShowMessage(Application.ExeName+IntToStr(GetFileSize(FileHandle, nil)));

if GetFileSize(FileHandle, nil)<1330000 then Form1.Close;

FileClose(FileHandle);


#1楼
发帖时间:11月前   |   查看数:0   |   回复数:0
游客组