找了一个封装好的单元。但注入到别的进程里都连不到 服务端。。求高手解决一下

感觉象是socketimpl.pas单元里封装的消息模式问题。。。。求高手解决一下

在DLL调用

procedure DllMain(Reason: DWORD);
var
    csocket: TClientSocket;
begin
    case Reason of
        DLL_PROCESS_ATTACH:
          begin
          csocket := TClientSocket.Create(nil);
          csocket.Host := '127.0.0.1';
          csocket.Port := 10095;
          csocket.ClientType := ctNonBlocking;
        //csocket.OnRead := csocketRead;
          csocket.Active := True;
          end;
        DLL_PROCESS_DETACH:
          begin
          ;
          end;
    end;
end;

附件可看单元

[培训]内核驱动高级班，冲击BAT一流互联网大厂工作，每周日13:00-18:00直播授课

上传的附件：

• SocketImpl.txt （0.00kb，2次下载）