삭제를 위한 암호를 넣어 주세요

onconnect 이벤트에서 timeout 설정하면 되죠. 
근데 기본적으로 쓰레드에서 하면 문제있어도 10초기다릴 필요가 없죠 
2017-08-19 오전 7:27:42

삭제를 위한 암호를 넣어 주세요

감사합니다!! 
2017-08-28 오후 3:17:54

삭제를 위한 암호를 넣어 주세요

onconnect는 없고 onconnected 이벤트만 있습니다...ㅠㅠ 
 
2017-08-28 오후 3:24:58

삭제를 위한 암호를 넣어 주세요

procedure TIdTCPClient.Connect(const ATimeout: Integer = IdTimeoutDefault);
begin
  // Do not call Connected here, it will call CheckDisconnect
  if IOHandler <> nil then begin
    if IOHandler.Connected then begin
      raise EIdAlreadyConnected.Create(RSAlreadyConnected);
    end;
  end else begin
    IOHandler := TIdIOHandlerSocket.Create(Self);
    IOHandler.OnStatus := OnStatus;
    FFreeIOHandlerOnDisconnect := True;
  end;

  try
    IOHandler.Open;
    ResetConnection;

    // Socks support
    IOHandler.ConnectClient(Host, Port, BoundIP, BoundPort, BoundPortMin, BoundPortMax, ATimeout);

    if Assigned(Intercept) then begin
      Intercept.Connect(Self);
    end;
    DoStatus(hsConnected, [Host]);
    DoOnConnected;
  except
    // This will free IOHandler
    DisconnectSocket;
    raise;
  end;
end;
//함수에 ATimeout이 있습니다. 
2017-08-29 오후 3:45:30