I
ilook
Unregistered / Unconfirmed
GUEST, unregistred user!
如何自动地读出光盘的盘符。用什么语句实现？
I
ilook
Unregistered / Unconfirmed
GUEST, unregistred user!
不会吧。这个问题都没有人回答吗？是不是分太少了？[
]
]
I
ilook
Unregistered / Unconfirmed
GUEST, unregistred user!
再up一下。
L
leezero
Unregistered / Unconfirmed
GUEST, unregistred user!
什么意思？
W
WangBingBing
Unregistered / Unconfirmed
GUEST, unregistred user!
UP
I
ilook
Unregistered / Unconfirmed
GUEST, unregistred user!
程序中有一部份需要从光盘里读一些文件。想启动程序后。可以自动读到光盘的盘符。
如f:/ ？？这个还不清楚吗？每台机子的光盘盘符不大一样。这样可以比较方便。当然也
可以通过路径选择对话框选择。不过那样麻烦了一点
如f:/ ？？这个还不清楚吗？每台机子的光盘盘符不大一样。这样可以比较方便。当然也
可以通过路径选择对话框选择。不过那样麻烦了一点
I
ilook
Unregistered / Unconfirmed
GUEST, unregistred user!
晕~~~
就是
在delphi中如何获得光盘盘符？？？？[
][][]
就是
在delphi中如何获得光盘盘符？？？？[
][][]
J
jsxjd
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button5Click(Sender: TObject);
var
c:char;
begin
combobox1.clear;
for c:='A' to 'Z' do
if GetDriveType(pchar(''+c+':'))=DRIVE_CDROM
then combobox1.items.add(''+c+':');
if combobox1.items.Count>0 then combobox1.ItemIndex:=0;
end;
var
c:char;
begin
combobox1.clear;
for c:='A' to 'Z' do
if GetDriveType(pchar(''+c+':'))=DRIVE_CDROM
then combobox1.items.add(''+c+':');
if combobox1.items.Count>0 then combobox1.ItemIndex:=0;
end;
I
ilook
Unregistered / Unconfirmed
GUEST, unregistred user!
呵呵，就是嘛.jsxjd。我发现你问的几个问题。你都答得很好呀。。在此多谢了。[
][]
][]
I
ilook
Unregistered / Unconfirmed
GUEST, unregistred user!
谢谢
