INDY TCPCLIENT TCPSERVER傳輸問題

發文回覆瀏覽次數：2815

推到 Plurk!

推到 Facebook!

缺席

dannynice
一般會員

發表：12
回覆：19
積分：6
註冊：2003-07-25

發送簡訊給我

#1 引用回覆回覆

發表時間：2003-10-05 13:06:20

IP:211.76.xxx.xxx 未訂閱

各位大大小弟使用INDYTCPSERVER 和TCPCLIENT連結只要一做 TCPCLIENT1->Connect(); 就會出現以下錯誤不知如何解決請各位大大幫小弟一個忙謝謝 Project IndyServer.exe raised exception class EIDNOExecuteSpecified with message No execute handler found Process stopped Use Step or Run to continue 小弟的系統是win2000Pro BCB6.0 INDY 9_00_11版程式碼如下 SERVER

#include 
#pragma hdrstop    #include "Main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TMainFrm *MainFrm;
TFileStream *receive;
//---------------------------------------------------------------------------
__fastcall TMainFrm::TMainFrm(TComponent* Owner)
        : TForm(Owner)
{   
}
//---------------------------------------------------------------------------    void __fastcall TMainFrm::IdTCPServer1Exception(TIdPeerThread *AThread,
      Exception *AException)
{
    int bytes=AThread->Connection->ReadInteger(true);
    AThread->Connection->ReadStream(receive,bytes,False);    
}
//---------------------------------------------------------------------------    void __fastcall TMainFrm::Button1Click(TObject *Sender)
{
    IdTCPServer1->Active=True;
}
//---------------------------------------------------------------------------    void __fastcall TMainFrm::FormCreate(TObject *Sender)
{
    IdTCPServer1->DefaultPort=1111;
    receive=new TFileStream("C:\\idnyTEST\\Server\\TXT\\ServerFile.txt",fmCreate);
}
//---------------------------------------------------------------------------    client    #include 
#pragma hdrstop    #include "Main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TMainFrm *MainFrm;
TFileStream *Client;
//---------------------------------------------------------------------------
__fastcall TMainFrm::TMainFrm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainFrm::Button1Click(TObject *Sender)
{
    IdTCPClient1->Connect();
}
//---------------------------------------------------------------------------
void __fastcall TMainFrm::Button2Click(TObject *Sender)
{
    IdTCPClient1->WriteStream(Client, true, true,Client->Size);    
}
//---------------------------------------------------------------------------
void __fastcall TMainFrm::FormCreate(TObject *Sender)
{
    IdTCPClient1->Host="127.0.0.1";
    IdTCPClient1->Port=1111;
    Client=new TFileStream("C:\\idnyTEST\\Client\\TXT\\安裝資訊.TXT",fmOpenRead);
    Edit1->Text=Client->Size;
}
//---------------------------------------------------------------------------

發表人 - Gemi0305 於 2003/10/05 13:14:15

RaynorPao
版主

發表：139
回覆：3622
積分：7025
註冊：2002-08-12

發送簡訊給我

#2 引用回覆回覆

發表時間：2003-10-05 22:02:49

IP:61.221.xxx.xxx 未訂閱

引言: 各位大大小弟使用INDYTCPSERVER 和TCPCLIENT連結只要一做 TCPCLIENT1->Connect(); 就會出現以下錯誤不知如何解決請各位大大幫小弟一個忙謝謝 Project IndyServer.exe raised exception class EIDNOExecuteSpecified with message No execute handler found Process stopped Use Step or Run to continue 小弟的系統是win2000Pro BCB6.0 INDY 9_00_11版程式碼如下 SERVER

#include 
#pragma hdrstop    #include "Main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TMainFrm *MainFrm;
TFileStream *receive;
//---------------------------------------------------------------------------
__fastcall TMainFrm::TMainFrm(TComponent* Owner)
        : TForm(Owner)
{   
}
//---------------------------------------------------------------------------    void __fastcall TMainFrm::IdTCPServer1Exception(TIdPeerThread *AThread,
      Exception *AException)
{
    int bytes=AThread->Connection->ReadInteger(true);
    AThread->Connection->ReadStream(receive,bytes,False);    
}
//---------------------------------------------------------------------------    void __fastcall TMainFrm::Button1Click(TObject *Sender)
{
    IdTCPServer1->Active=True;
}
//---------------------------------------------------------------------------    void __fastcall TMainFrm::FormCreate(TObject *Sender)
{
    IdTCPServer1->DefaultPort=1111;
    receive=new TFileStream("C:\\idnyTEST\\Server\\TXT\\ServerFile.txt",fmCreate);
}
//---------------------------------------------------------------------------    client    #include 
#pragma hdrstop    #include "Main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TMainFrm *MainFrm;
TFileStream *Client;
//---------------------------------------------------------------------------
__fastcall TMainFrm::TMainFrm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainFrm::Button1Click(TObject *Sender)
{
    IdTCPClient1->Connect();
}
//---------------------------------------------------------------------------
void __fastcall TMainFrm::Button2Click(TObject *Sender)
{
    IdTCPClient1->WriteStream(Client, true, true,Client->Size);    
}
//---------------------------------------------------------------------------
void __fastcall TMainFrm::FormCreate(TObject *Sender)
{
    IdTCPClient1->Host="127.0.0.1";
    IdTCPClient1->Port=1111;
    Client=new TFileStream("C:\\idnyTEST\\Client\\TXT\\安裝資訊.TXT",fmOpenRead);
    Edit1->Text=Client->Size;
}
//---------------------------------------------------------------------------

dannynice 你好:
(1)先參考看看這篇文章
   >最前面呢??
   >    --

------
-- 若您已經得到滿意的答覆，請適時結案!! --
-- 欲知前世因，今生受者是；欲知來世果，今生做者是 --
-- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 --

Albertz
初階會員

發表：2
回覆：57
積分：31
註冊：2002-09-05

發送簡訊給我

#3 引用回覆回覆

發表時間：2003-10-06 09:19:13

IP:211.20.xxx.xxx 未訂閱

答案就在你的 error message 裡面 "Project IndyServer.exe raised exception class EIDNOExecuteSpecified with message" IdTCPDServer 必須要有一個 OnExecute method 處理所有 connection thread. 不是在 "IdTCPServer1Exception" 裡.

系統時間：2024-04-29 21:39:42

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！