取得相對路徑的問題 |
|
答題得分者是：T.J.K
|
|
fbiceo
一般會員   發表：6 回覆：12 積分：3 註冊：2004-08-04 發送簡訊給我 |
各位大家好 目前遇到了取得相對路徑的問題，不知道是否有API可以做到呢？ 目前如果使用GetCurrentDirectory 可以得到下面的內容 C:\TEST\程式集喔喔\KKBOX
C:\TEST\程式集喔喔\KKMAN3
C:\TEST\程式集喔喔\Macromedia\讀我檔案
C:\TEST\程式集喔喔\Macromedia
C:\TEST\程式集喔喔\Maction PaPaGOV7
C:\TEST\程式集喔喔\National Instruments\LabVIEW 7.1
C:\TEST\程式集喔喔\National Instruments
C:\TEST\程式集喔喔\Nero\Nero OEM
C:\TEST\程式集喔喔\Nero\Nero Toolkit
C:\TEST\程式集喔喔\Nero\用戶指南
C:\TEST\程式集喔喔\Nero 如果我已經知道這些東西都是在 C:\TEST\程式集喔喔 底下，(一開始就指定這個目錄去找底下目錄) 是否有函式可以得到
\KKBOX
\KKMAN3
\Macromedia\讀我檔案
\Macromedia
\Maction PaPaGOV7
\National Instruments\LabVIEW 7.1
\National Instruments
\Nero\Nero OEM
\Nero\Nero Toolkit
\Nero\用戶指南
\Nero 也就是相對於 C:\TEST\程式集喔喔 的位置 如果沒有這類函式，是否有可以指定移除字串中的特定字串呢？
例如把 C:\TEST\程式集喔喔\KKBOX 內的 C:\TEST\程式集喔喔 移除，剩下\KKBOX 謝謝各位的解答，感激不盡
|
|
T.J.K
中階會員   發表：3 回覆：35 積分：57 註冊：2005-06-28 發送簡訊給我 |
用簡單的Delete就可做到
exp :
procedure TForm1.Button1Click(Sender: TObject);
const
Str_dex = 'C:\TEST\程式集喔喔';
var
Str : String;
begin
Str := 'C:\TEST\程式集喔喔\National Instruments\LabVIEW 7.1';
Delete(Str, 1, Length(Str_dex));
showmessage(Str);
end;
供參考
|
|
T.J.K
中階會員 發表：3 回覆：35 積分：57 註冊：2005-06-28 發送簡訊給我 |
|
|
fbiceo
一般會員 發表：6 回覆：12 積分：3 註冊：2004-08-04 發送簡訊給我 |
發表時間：2005-07-29 18:02:50
IP:59.104.xxx.xxx 未訂閱
系統時間：2024-05-18 5:25:29
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |