用NMStream傳送資料 |
答題得分者是:RaynorPao
|
paul67
一般會員 發表:20 回覆:18 積分:7 註冊:2003-03-17 發送簡訊給我 |
Hello... 小弟用NMStream傳送連續圖檔卻發生一個問題
ESocketError 10038 Socket Operation On non-Socket
請問出了什麼錯呢??
以下是我送資料和傳資料的程式.. 傳送資料...
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TMemoryStream *msBuf=new TMemoryStream;
for (int argc=1;argc<=FileListBox1->Items->Count;argc )
{
jpeg = new TJPEGImage;
jpeg->LoadFromFile(FileListBox1->Directory "\\" IntToStr(argc) ".jpg");
jpeg->SaveToStream(msBuf);
msBuf->Position=0;
NMStrm1->Host = "192.168.10.148";
NMStrm1->FromName = "192.168.10.148";
NMStrm1->PostIt(msBuf);
//NMUDP1->RemoteHost="192.168.10.148";
//NMUDP1->RemotePort=22;
//NMUDP1->SendStream(msBuf);
msBuf->Clear();
delete jpeg;
}
delete msBuf;
}
接收資料
void __fastcall TForm1::NMStrmServ1MSG(TComponent *Sender,
const AnsiString sFrom, TStream *strm)
{
msBuf->Position = 0;
strm->Position = 0;
msBuf->CopyFrom(strm,strm->Size);
msBuf->Position = 0;
jpeg->LoadFromStream(msBuf);
Image1->Picture->Assign(jpeg);
msBuf->Position = 0;
strm->Position = 0;
}
|
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
引言: 小弟用NMStream傳送連續圖檔卻發生一個問題 ESocketError 10038 Socket Operation On non-Socket 請問出了什麼錯呢?? 以下是我送資料和傳資料的程式.. 傳送資料... void __fastcall TForm1::Button1Click(TObject *Sender) { TMemoryStream *msBuf=new TMemoryStream; for (int argc=1;argc<=FileListBox1->Items->Count;argc ) { jpeg = new TJPEGImage; jpeg->LoadFromFile(FileListBox1->Directory "\\" IntToStr(argc) ".jpg"); jpeg->SaveToStream(msBuf); msBuf->Position=0; NMStrm1->Host = "192.168.10.148"; NMStrm1->FromName = "192.168.10.148"; NMStrm1->PostIt(msBuf); //NMUDP1->RemoteHost="192.168.10.148"; //NMUDP1->RemotePort=22; //NMUDP1->SendStream(msBuf); msBuf->Clear(); delete jpeg; } delete msBuf; } 接收資料 void __fastcall TForm1::NMStrmServ1MSG(TComponent *Sender, const AnsiString sFrom, TStream *strm) { msBuf->Position = 0; strm->Position = 0; msBuf->CopyFrom(strm,strm->Size); msBuf->Position = 0; jpeg->LoadFromStream(msBuf); Image1->Picture->Assign(jpeg); msBuf->Position = 0; strm->Position = 0; } paul67 你好: (1)請問你傳送的每一個檔案大約有多大呢?? ( > // >>>>>>>>>>Host="192.168.16.152">FromName="192.168.16.151"; NMStrm1->PostIt(ms); delete jpg; delete ms; } } (3)我只寫傳輸的部分,秀圖的部分就暫時不寫了-- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! -- -- 欲知前世因,今生受者是;欲知來世果,今生做者是 -- -- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 -- |
paul67
一般會員 發表:20 回覆:18 積分:7 註冊:2003-03-17 發送簡訊給我 |
|
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
引言: 感謝您回覆我這麼多次.. 我傳的圖檔大小都小於20K呀 paul67 你好: (1)我已經試過每個檔案的大小為 563 KB,也是沒有問題的,不知道你的問題 為何呢?? 測試環境: Server: Windows 2000 Server SP3, BCB 6.0, Update 4 Client: Windows 2000 Server SP3, BCB 6.0, Update 4 (2)是否方便把你的 Project 上傳至「會員求助程式檔案上傳區」,幫你看看 http://delphi.ktop.com.tw/forum.asp?FORUM_ID=97-- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! -- -- 欲知前世因,今生受者是;欲知來世果,今生做者是 -- -- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 -- |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |