怎么判断所在盘符的类型？(100分)

L

lincker

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-29

• #1

我用installshield做安装，想运行前判断一下程序是否在光盘上，如果是在硬盘上就不能
安装。应该怎么做呢？望高手指教！
记得好像是有个api函数的，但是不记得了的说.

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-29

• #2

这个够吗？摘自hubdog的葵花宝典。
var x:integer;
driverchar;
begin
driver:='f:/';
x := GetDriveType(driver);
Case x of
2: Label1.Caption := '该驱动器是可移动驱动器';
3: Label1.Caption := '该驱动器是固定驱动器';
4: Label1.Caption := '该驱动器是网络驱动器';
5: Label1.Caption := '该驱动器是CD-ROM驱动器';
6: Label1.Caption := '该驱动器是虚拟驱动器';
Else Label1.Caption := '该驱动器无效';
End;
end;

 

L

lincker

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-29

• #3

取当前盘符的那个函数呢？
麻烦老兄一并告知，100大洋一定奉上，呵呵

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-29

• #4

你执行可执行文件，那么Application.ExeName什么的都能够取得本地盘符了。

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-29

• #5

还有，绝对不能找当前路径，如果我在C盘敲：F:/Setup.exe，当前路径是C呀。[]

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-29

• #6

同时，如果用虚拟光驱软件呢？我估计你拿它没办法。
那东西读出来就是光驱。因为是做到了驱动程序级别。

 

L

lincker

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-29

• #7

多谢！
还有点线程的问题，很简单，不知yzhshi老兄能否回答，可另行加分。

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-29

• #8

分数无所谓，不过我对多线程还是不特别熟悉，呵呵。一起探讨倒可以。[]

 

L

lincker

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-29

• #9

http://www.delphibbs.com/delphibbs/dispq.asp?lid=806472

谢谢！