delphi获取当前计算机所有盘符
来源:互联网 发布:js单步断点调试快捷键 编辑:程序博客网 时间:2024/04/30 02:26
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;
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获取当前计算机所有盘符
- delphi获取计算机当前用户名
- VC中如何获取当前计算机中所有逻辑驱动器的数目和盘符
- VC中获取当前计算机中所有逻辑驱动器的数目和盘符
- 获取当前计算机所有性能计数器
- Delphi 获取当前目录
- delphi 获取当前输入法
- Delphi 获取当前目录
- 获取计算机所有串口
- delphi获取系统当前时间
- delphi获取目录下所有文件名[delphi]
- 获取系统当前所有进程
- 枚举当前计算机所有的CSP名称
- 用Delphi获取当前系统时间
- 用Delphi获取当前系统时间
- 用Delphi获取当前系统时间
- 用Delphi获取当前系统时间
- delphi 获取当前进程的cpu占用率
- hello csdn!
- 转:vim的复制粘贴小结
- js区分浏览器
- hibernate id Generator
- Java中的参数传递方式到底是引用传递还是值传递?
- delphi获取当前计算机所有盘符
- 仿youku鼠标悬停js
- uda1341声卡的linux 2.6.28版本内核驱动在arm s3c2440上的移植。
- 剖析Linux系统中硬链接与软链接的区别
- 多域控制器环境下Active Directory灾难恢复
- 为什么申请了VIP会员不给分?
- LINUX目录详解
- C#连接数据库和更新数据库
- 度量资源使用量