BCB下的寫法：光碟機與磁碟機的問題 |
|
尚未結案
|
|
stickitout
一般會員   發表：15 回覆：8 積分：4 註冊：2003-06-03 發送簡訊給我 |
小弟目前已經學會如何讀取磁碟機、光碟機內的檔案了……但是小弟目前碰到了四個問題： Question A：如何偵測光碟機內有無光碟片呢~??? Question B：如何偵測DriveComboBox中哪些是光碟機呢?? Question C：如何偵測出DriveComboBox所有的.exe檔案呢~~ Question D：我們在DriveComboBox所得到的Drives是這顆硬碟中所有的分
割區(包括隱藏的分割區)，能不能做到只秀出本作業系統中 所有的分割區呢? 我試過各位大大在Delphi中的寫法……是ok的~~ 但是小弟試試用BCB卻試不出來~~ 還望各位大大教小弟一下用BCB怎麼做… 謝謝各位大大!!
|
|
AB
高階會員  發表：166 回覆：262 積分：125 註冊：2003-08-21 發送簡訊給我 |
1 請問一下 兄台 有先找資料過嗎
2 好像有點像開規格 交作業 喝喝
=======================================
(包括隱藏的分割區)，能不能做到只秀出本作業系統中 所有的分割區呢? 我試過各位大大在Delphi中的寫法……是ok的
=======================================
和我想的不同 這delphi要能ok 實在是 與 包子大人同等級的高手 很想知道 你在那個網站看到的 可以順便說一下嗎?
解 A 看看
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=38540
|
|
stickitout
一般會員 發表：15 回覆：8 積分：4 註冊：2003-06-03 發送簡訊給我 |
|
|
stickitout
一般會員 發表：15 回覆：8 積分：4 註冊：2003-06-03 發送簡訊給我 |
|
|
RaynorPao
版主  發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
引言: 大大請放心…小弟確實有在站上努力的找過…但是都是Delphi的寫法…… 小弟用Delphi試是可以的…。但是用BCB試卻一直碰壁。 Question A：如何偵測光碟機內有無光碟片呢~??? Question B：如何偵測DriveComboBox中哪些是光碟機呢?? Question C：如何偵測出DriveComboBox所有的.exe檔案呢~~ 有沒有BCB的寫法呢~~ 謝謝各位大大!
stickitout 你好:
(1)偵測有沒有 CD?? 試試看這樣子寫可不可以呢??
WIN32_FIND_DATA wfd;
HANDLE handle=INVALID_HANDLE_VALUE;
handle=FindFirstFile("e:\\*.*", &wfd);
if(handle==INVALID_HANDLE_VALUE)
{
ShowMessage("No CD");
}
else
{
ShowMessage("Yes CD");
}
FindClose(handle);
(2)哪些是光碟機?? 可以利用這兩個 Win32 API 就可以辦到
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fileio/base/getlogicaldrivestrings.asp
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fileio/base/getdrivetype.asp
char szDrive[1024]={0};
UINT ui=0;
char *szTemp=NULL;
if(GetLogicalDriveStrings(1024, szDrive))
{
szTemp=szDrive;
while(*szTemp!='\0')
{
ui=GetDriveType(szTemp);
if(ui==DRIVE_CDROM)
{
Memo1->Lines->Add((AnsiString)szTemp " is a CDROM");
}
szTemp =4;
}
}
(3)偵測所有的 exe 檔?? 把這篇文章中的範例改一下就可以了
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=36809
-- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2003/11/28 09:17:25
------
-- 若您已經得到滿意的答覆，請適時結案!! -- -- 欲知前世因，今生受者是；欲知來世果，今生做者是 -- -- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 -- |
|
anpino
版主 發表：31 回覆：477 積分：231 註冊：2003-01-02 發送簡訊給我 |
發表時間：2003-11-28 00:37:36
IP:211.78.xxx.xxx 未訂閱
系統時間：2024-05-05 12:25:31
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |