Estou desenvolvendo uma aplicação Cliente/Servidor usando os
componentes TTcpServer e TTcpClient em Delphi 6. Mas estou tendo um
problema com servidor. Sempre que o programa fecha, ocorre um erro
de "Access Violation". Estou usando o servidor com BlockMode em
bmThreadBlock. O componente TcpServer1 fica em modo listening e
quando há uma notificação de cliente querendo se conectar ocorre o
evento OnAccept, tratado pela função TcpServer1Accept, onde eu recebo
como parâmetro ClientSocket, que é o socket criado para manipular a
conexão com o cliente. Eu faço todo o procedimento de troca de
mensagens com o cliente dentro desta função TcpServer1Accept. Quando
o cliente desconecta, o programa sai desta função. Quando o programa
vai fechar uso os seguintes comandos: TcpServer1.Close e
TcpServer1.ServerSocketThread.Terminate. Após isso, quando o programa
já está encerrando ocorre um "Access Violation". Alguém sabe me dizer
o que estou fazendo de errado e como posso corrigir este problema?
Agradeço qualquer ajuda.





-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a