Overbyte ICS NOFORMS模式

Question

我正在尝试在Delphi控制台应用程序（服务）中使用Overbyte ICS TWsocket。 我在条件中设置了NOFORMS。 但是在Connect处，连接不会转到它挂起wsConnected状态的wsConnecting，并且操作以异步套接字错误10053 结束。

我尝试在OnMessagePump ProcessMessages()，MessageLoop()中使用，但它没有改变任何内容。

以下是代码的一部分

inherited Create(nil);
Self.OnDataAvailable := MyOnReceive;
Self.OnChangeState := MyOnStateChange;
Self.OnMessagePump := MyMessagePump;
Addr := AIpAddress;
Port := IntToStr(AConnectionInfo.Port);
Proto := AConnectionInfo.Proto;
ComponentOptions := [wsoTcpNoDelay];

如何正确使用NOFORMS在控制台应用程序中使用TWsocket？