Indy FTP Server 的目錄如何產生及傳給FTP Client? |
|
缺席
|
|
devademon
一般會員   發表：4 回覆：12 積分：3 註冊：2004-09-02 發送簡訊給我 |
請教各位高手,我弄了個Indy FTP Server,
Client-Server之間可以連線,
但是連線後Server的目錄無法列表出來送給FTP Client,
目前知道目錄列表可能要寫在
IdFTPServer的OnListDirectory這個事件裡(因為是LIST指令),
OnListDirectory裡面要寫的程式碼我測試了一些TIdFTPListItems裡的東東,
但都不行,我本來以為是要自己把Server這邊的目錄捉成TStrings,
再餵給LoadList,但實作上都失敗..... 第一次寫FTP Server程式,也看了一些線上文章,
大概了解Server這邊最重要的是事件的處理,
但在目錄列表這邊就是搞不定.... 請各位大大指點一下迷津....謝謝~~
|
|
devademon
一般會員 發表：4 回覆：12 積分：3 註冊：2004-09-02 發送簡訊給我 |
|
|
devademon
一般會員 發表：4 回覆：12 積分：3 註冊：2004-09-02 發送簡訊給我 |
|
|
devademon
一般會員 發表：4 回覆：12 積分：3 註冊：2004-09-02 發送簡訊給我 |
|
|
devademon
一般會員 發表：4 回覆：12 積分：3 註冊：2004-09-02 發送簡訊給我 |
|
|
SENFO
一般會員 發表：13 回覆：22 積分：7 註冊：2006-07-10 發送簡訊給我 |
版大可否提供一下您寫好的OnListDirectory的程式段上來讓大家參考一下，謝謝
===================引 用 devademon 文 章=================== 搞了好久終於搞定了, 自問自答囉....  在OnListDirectory這個事件裡, 依序要做的是... (1)設定要傳送目錄格式 (2)取得Server端目錄 (3)新增一筆準備給Client的資料 (4)將Server端取得的目錄(一個檔案或目錄)丟給(2)所新增出來的資料 (1)ADirectoryListing->ListFormat = (flfUnix); (2)我用的方法是 TSearchRec FindFirst FindNext,去捉到我所要的Server端目錄列表,這裡在 BCB6 HELP 裡有 Example (3)ADirectoryListing->Add(); (4)在 BCB6 HELP 裡的 Example 中的迴圈中加入.... ADirectoryListing->Items[i]->FileName = sr.Name;//這裡加入檔案資料 ADirectoryListing->Items[i]->Size = sr.Size; ....(在這裡填上要加的屬性,至少要會判斷是不是目錄).... 然後Client就會收到目錄列表了, 新手如果說得不好,請勿見怪~  謝謝大家~~
|
發表時間：2004-09-08 18:20:19
IP:210.66.xxx.xxx 未訂閱
系統時間：2024-04-24 3:28:20
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |