全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1682
推到 Plurk!
推到 Facebook!

如何刪除指定的文件

尚未結案
suntao008
一般會員


發表:70
回覆:38
積分:21
註冊:2003-10-19

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-11-23 21:15:08 IP:61.155.xxx.xxx 未訂閱
各位高手: 小女子有事相求: 我在EDIT中輸入文件名(指WINDOWS中的文件名)按一下按鈕就刪除這個文件,謝謝各位幫忙,小女子謝過了。
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-11-23 21:31:57 IP:202.39.xxx.xxx 未訂閱
function DeleteFile(Edit1.Text): Boolen; --- Everything I say is a lie.
cashxin2002
版主


發表:231
回覆:2555
積分:1937
註冊:2003-03-28

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-11-24 18:58:06 IP:63.84.xxx.xxx 未訂閱
您好﹗    DeleteFile函數在刪除檔案時有Boolean的回傳值﹐另外﹐System單元還提供一個Erase的刪除檔案函數﹐其与DeleteFile函數的不同﹐就是沒有回傳值﹐直接刪除檔案﹐範例如下﹕
Var
  F : TextFile;
begin
  AssignFile(F, Edit1.Text);
  Try
    Erase(F);
    ShowMessage('指定檔案已被刪除');
  Except On Error: EInOutError do
    ShowMessage('無法刪除檔案'  #10#13   '原因﹕'  Error.Message);
  end;
end;
參考看看﹗ ===================== 努力,相信會獲得美麗! 忻晟
------
忻晟
系統時間:2024-07-01 15:16:12
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!