Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.08.27;
Скачать: CL | DM;

Вниз

Как грамотно узнать тип файловой системы   Найти похожие ветки 

 
AlexTrosh   (2006-08-04 23:55) [0]

Использую GetVolumeInformation, а затем сравниваю FileSystemNameBuffer со строками "NTFS" или "FAT".
Может есть какой-нибудь более красивый способ кроме

procedure TForm1.Button1Click(Sender: TObject);
var
 MaxFileNameLen, FSFlags: Cardinal;
 FileSystemName: array[0..MAX_PATH -1] of Char;
begin
 GetVolumeInformation("c:\",nil,0,nil,MaxFileNameLen,FSFlags,FileSystemName,SizeO f(FileSystemName));
 if FileSystemName = "NTFS" then
   ShowMessage("NTFS")
 else
   ShowMessage("FAT");
end;


 
Leonid Troyanovsky ©   (2006-08-05 10:41) [1]


> AlexTrosh   (04.08.06 23:55)  

> Использую GetVolumeInformation, а затем сравниваю FileSystemNameBuffer
> со строками "NTFS" или "FAT".
> Может есть какой-нибудь более красивый способ кроме


А, что значит "более красивый"?
Наверное, имелось ввиду "более правильный"?
Во-первых, следует проверять возвращаемое функцией,
скажем, Win32Check.
Во-вторых, вариантов файловой системы может быть больше
чем два, скажем, HPFS, FAT32.
Ну, и сравнивать строки положено несколько по-другому,
скажем, функцией StrLIComp.

--
Regards, LVT.



Страницы: 1 вся ветка

Текущий архив: 2006.08.27;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.038 c
2-1155046594
4izh
2006-08-08 18:16
2006.08.27
мессага для класса msocommandbar


6-1144449490
vagra
2006-04-08 02:38
2006.08.27
Узнать IP по имени домена


1-1153251715
Gloomer
2006-07-18 23:41
2006.08.27
Как перекодировать строку из UTF-8 в ANSI?


2-1154693181
AlexanderMS
2006-08-04 16:06
2006.08.27
Работа с иконками (TIcon).


2-1155029871
SamProf
2006-08-08 13:37
2006.08.27
Правильная синхронизация