请问如何知道本机是有硬盘的还是没有硬盘(即无盘工作站)的?如何判断本机有几个硬盘分区?请高手指点。先谢了!
解决方案 »
- 请教怎样从一個文本文件中把所有數字累加起來,然後顯示出結果,救救我,马上就要交了
- 一个奇怪的问题请问BDE连接与ADO有什么不同啊?
- 散分:准备改行,大家给点意见。
- 如何挂起/唤醒其它程序?
- 高手请帮忙!
- 求delphi7.0没有bug的安装盘
- 想了解一下ADOConnection的Onconnect、afterconnect、beforeconnect、Onlogin 事件的含义
- 无事,散分随便问一个问题~~~~~~~~~~
- 我要快疯了!使用Table.AddIndex()方法建立表索引的问题详述,请行家里手指点!
- 简单三层问题:Delphi 5自带例子:Demos--Midas--Adhoc?
- 一个很急手的问题
- 一个极其具有挑战性的问题!(1000分相送,不够再加)
var
drive:char;
begin
result:='';
for drive:='a' to 'z' do
begin
if GetDriveType(pchar(Drive+':\'))=3 then
result:=result+drive;
end;
end;