Table of Contents
Vale a pena conferir esses métodos de solução de problemas quando você receber o erro winsock Delphi.
Como corrigir falhas do Windows
Soquetes de componentes Winsock e Delphi
O Windows (Winsock) fornece uma interface aberta projetada para programação de rede do sistema operacional Windows. Ele contém um conjunto de funções, wrappers de dados e controles relacionados necessários para usar serviços de rede, como qualquer pilha de projeto. Winsock atua em um link entre aplicativos de rede para as pilhas de métodos subjacentes.
Problema ao enviar() Winsock.
08/04/2008 05:11:39Delphi206O resgate. Estou divulgando esta mensagem porque simplesmente não tenho mais planos.Como resolver este problema principal. Em uma guitarra móvel adequada (Win Mobile 6), executeUm aplicativo no qual determinados registros (string “HELLO”) são levados ao mercadoServidor. O problema tornou-se que também podemos nos conectar no mercado ao servidorO método send(…) não funciona e/ou nenhum erro é visívelaplicativo aplicativo (dispositivo móvel).Aqui está o código por você mesmo (semelhante a C:Program FilesWindows Mobile 6 SDKSamplesCommonCPPWin32SockApp se você ganhar6 SDKs instalados):RESULTADO H=E_FAIL;VSATA wsaData = 0;SOQUETE meuSoquete;sockaddr_in serviço individual;CHAR szDeviceIP[MAX_PATH] é igual a “192.168.0.112”;INT bytesSent equivale a SOCKET_ERROR;INT é iRet 0;BOOL fSockInitialized=FALSE;CHAR sendbuf[25] significa “Olá”;// InitialCustomize Winsock.iRet é igual a WSAStartup(MAKEWORD(2,2), &wsaData);if(iRet!= NOT_ERROR)h = E_FAIL;vá para finalmente a saída;fSockInitialized=TRUE;// Soquete CreomySocket significa Socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);if (meu soquete == )IRet invalid_socket = WSAGetLastError();hora = HRESULT_FROM_WIN32(iRet);ir como um caminho para a saída;clientService.sin_family = AF_INET;clientService.sin_addr.s_addr é igual a inet_addr(szDeviceIP);clientService.sin_port é htons(4130);//servidor vinculadoiRet é igual a connect(mySocket, (SOCKADDR*) &clientService,sizeof(atendimento ao cliente));if (SOCKET_ERROR == iRet)iRet significa WSAGetLastError();hora é HRESULT_FROM_WIN32(iRet);vá para normalmente a saída;// mando = bufferbytesSent send(mySocket, sendbuf, sizeof(sendbuf), 0);if (SOCKET_ERROR == bytesSent)iRet vai junto com WSAGetLastError();hora = HRESULT_FROM_WIN32(iRet);vá para algumas das saídas;h=S_OK;Saída:if (meu soquete!= NULL)feche normalmente o socket (meu socket);if(fSockInitialized)WSA Cleanup();if(ERRO(horas))/*Erro*/AJUDA!!!! Obrigado.MAS
Send Winsock Delphi
Stuur Winsock Delphi
Invia Winsock Delfi
Enviar Winsock Delphi
Skicka Winsock Delphi
Senden Sie Winsock Delphi
Envoyer Winsock Delphi
Wyślij Winsock Delphi
Отправить Winsock Delphi
Winsock 델파이 보내기
