請問有關NMStrmServㄉㄧ個問題?? |
|
答題得分者是：RaynorPao
|
|
pilipili001
一般會員   發表：10 回覆：12 積分：4 註冊：2003-07-17 發送簡訊給我 |
請問我用NMStrmServㄑ接收從client端所傳送過來ㄉ檔案，我要如何才可以知道我所傳送時檔案ㄉ檔名ㄋ
ex: client傳 111.exe
server 也接收111.exe
程式 server 端
TFileStream *FStream1;
FStream1 = new TFileStream("c:\\111.exe",fmCreate);
FStream1->CopyFrom(strm, strm->Size);
FStream1->Free();
這樣寫能接收到檔案，但檔名是我自己所設ㄉ，不是從client端接收到ㄉ檔名為111.exe，不知有何方法可以修改嗎，請大家教學一下，謝謝
|
|
RaynorPao
版主   發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
引言: 請問我用NMStrmServㄑ接收從client端所傳送過來ㄉ檔案，我要如何才可以知道我所傳送時檔案ㄉ檔名ㄋ ex: client傳 111.exe server 也接收111.exe 程式 server 端 TFileStream *FStream1; FStream1 = new TFileStream("c:\\111.exe",fmCreate); FStream1->CopyFrom(strm, strm->Size); FStream1->Free(); 這樣寫能接收到檔案，但檔名是我自己所設ㄉ，不是從client端接收到ㄉ檔名為111.exe，不知有何方法可以修改嗎，請大家教學一下，謝謝
pilipili001 你好:
(1)你可以利用 NMStrm/NMStrmServ 中的 FromName 屬性來傳遞檔案名稱
(2)請參考以下的範例程式碼
// Client
void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString szFileName="111.exe";
NMStrm1->Host=SERVER_IP;
NMStrm1->FromName=szFileName; TMemoryStream *ms=new TMemoryStream;
ms->LoadFromFile(szFileName);
NMStrm1->PostIt(ms);
delete ms;
}
// Server
void __fastcall TForm1::NMStrmServ1MSG(TComponent *Sender,
const AnsiString sFrom, TStream *strm)
{
AnsiString szFileName=sFrom;
TMemoryStream *ms=new TMemoryStream;
ms->Position=0;
strm->Position=0;
ms->CopyFrom(strm, strm->Size);
ms->SaveToFile(szFileName);
delete ms;
}
(3)請再依照自己的需求，自行修改
------
-- 若您已經得到滿意的答覆，請適時結案!! -- -- 欲知前世因，今生受者是；欲知來世果，今生做者是 -- -- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 -- |
|
pilipili001
一般會員 發表：10 回覆：12 積分：4 註冊：2003-07-17 發送簡訊給我 |
發表時間：2004-08-10 21:06:59
IP:219.68.xxx.xxx 未訂閱
系統時間：2024-05-19 4:18:15
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |