delphi获取当前计算机所有盘符
2009-04-13 14:21
791 查看
GetDriveType(路径) 判断一个磁盘驱动器的类型 返回一个整数
0 驱动器类型不确定
1 系统目录不存在
2 DRIVE_REMOVABLE 是可移动驱动器
3 DRIVE_FIXED 是固定驱动器
4 DRIVE_REMOTE 是网络驱动器
5 DRIVE_CDROM 是CD-ROM驱动器
6 DRIVE_RAMDISK 是虚拟驱动器
function getPath : integer;
var
i:integer;
begin
for i := 65 to 90 do
begin
if (GetDriveType(Pchar(chr(i)+':/')) = 2) or (GetDriveType(Pchar(chr(i)+':/')) = 3) then
Form1.ListBox1.items.addObject(chr(i)+':/',Pointer(i));
end;
end;
程序效果将在Form1.ListBox1中列出当前固定驱动器和可移动驱动器
相关文章推荐
- delphi获取当前计算机所有盘符
- VC中获取当前计算机中所有逻辑驱动器的数目和盘符
- VC中如何获取当前计算机中所有逻辑驱动器的数目和盘符
- 使用组策略获取AD中所有计算机当前登录用户信息
- 获取当前计算机所有性能计数器
- ASP.NET----获取当前计算机上所有的驱动器信息
- delphi获取计算机当前用户名
- Java 多线程编程之四:获取 Java VM 中当前运行的所有线程
- 获取Java VM中当前运行的所有线程
- ios-day11-01(UIWindow的常用方法。makeKeyWindow、makeKeyAndVisible、获取当前应用的主窗口和所有窗口)
- php获取当前月的所有日期
- gdb attach到已经存在的进程进行在线调试------能获取当前栈的所有变量值(转)
- C# 获取本地电脑所有的盘符
- C#获取指定盘符/文件夹下的所有folder/data,并输出保存到*.txt
- jquery获取table当前行的内容,table所有内容
- 问题:如何获取当前步骤的子步骤所有处理人?见正文
- delphi 获取某个页面所有的链接
- 获取所有员工当前的manager
- 一行命令获取当前JVM所有可设置的参数以及当前默认值
- windows的磁盘操作之七——获取当前所有的物理磁盘号