在自建组件中使用使用TClientSocket的问题

[wtzyb4446]

我自建一个组件，有一个成员变量TClientSocket socket，我该怎样处理这个socket的OnConnect, OnRead, OnWrite等事件？我刚学CBuilder不久，不知道该怎样写他的消息映射函数，大家帮帮忙。

[netsys2]

在无窗体的DLL中怎样使用TClientSocket?怎么添加它的事件响应？
http://expert.csdn.net/Expert/topic/2007/2007157.xml?temp=.4414026

[HenryGo]

很久没人理这副帖子啦，帮忙友情UP,希望有人回答。

[fatwave]

自建一个组件

组件有可视的与非可视的，后者可以用netsys2(来电) ( ) 的
可视的就写事件就可以了或自己定义它的事件

[TangSe]

和拖放在窗口上的一样处理啊。
void __fastcall TMyComponent::ClientSocket1Connect(TObject *Sender,
TCustomWinSocket *Socket);

TMyConponent::TMyComponnet(..)
{
socket->OnConnect=ClientSocket1Connect;
}

一样的。

[TangSe]

另外，VCL组件只能new。
TClientSocket *socket;
TMyConponent::TMyComponnet(..)
{
socket=new TClientSocket();
socket->OnConnect=ClientSocket1Connect;
}