반응형 디스크 할당 구하기1 [개발/delphi] 파일크기/디스크할당크기 구하는 여러가지 방법 [개발/delphi] 파일크기/디스크할당크기 구하는 여러가지 방법 procedure TForm1.FileListBox1Click(Sender: TObject); var _DirFileName:String; FileInfo:integer; SizeLow, SizeHigh:Dword; FSectorsPerCluster, FBytesPerSector, FNumberOfFreeClusters, FTotalNumberOfClusters:DWord; FH : THandle; FI : TByHandleFileInformation; begin _DirFileName := FileListBox1.FileName; FileInfo := FileOpen(ExTractfilename(_DirFileName), fmOpenRe.. 2012. 1. 7. 이전 1 다음 반응형