[delphi-br] Re: Por Favor, Ajudem! - TcpServer
Já consegui resolver meu problema. Mas, infelizmente, ninguém no grupo me deu alguma ajuda. Não sei por que... Talvez realmente ninguém soubesse como ajudar, mas, mesmo neste caso, acho que não custaria dar pelo menos uma resposta, pra que eu não ficasse com a impressão de que ninguém quisesse me ajudar. Mandei três mensagens pedindo ajuda e, em uma semana, não obtive uma resposta sequer. Bastante decepcionado, estou deixando o grupo... Obrigado. --- Em [EMAIL PROTECTED], "mjackalbr" <[EMAIL PROTECTED]> escreveu > > 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
[delphi-br] Por Favor, Ajudem! - TcpServer
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
[delphi-br] Re: FindWindow
Primeiramente você deve declarar as seguintes variáveis:
Handle: HWND; //um inteiro que é o manipulador, uma espécie de "ID"
da janela
NClass, NWindow: PChar //nomes da classe e o nome da janela
Deve inicializar NClass e NWindow
NClass := PChar('nome da classe');
NWindow := PChar('nome da janela');
Então vc deve chamar a função da seguinte maneira:
Handle := FindWindow(NClass,NWindow);
Ela retorna o manipulador da janela
Uma observação: não é necessário passar os dois parâmetros para
FindWindow. Você pode passar apenas o nome da janela ou o nome da
classe. Neste caso, um dos parâmetros será nil.
Handle := FindWindow(nil,NWindow);
OU
Handle := FindWindow(NClass,nil);
Espero ter ajudado. Caso tenha ainda alguma dúvida posso enviar como
exemplo um programa que eu fiz em que usei as funções FindWindow e
ShowWindow.
[]'s
--- Em [EMAIL PROTECTED], "jrjuniore" <[EMAIL PROTECTED]>
escreveu
> Galera,
>
> alguém sabe me dizer como uso a função FindWindow, ou se alguém tem
um
> exemplo com esta função
>
> Josué F. Coelho Jr.
> TECHMAIL - Desenvolvimento de Sistemas
> * (11) 3749-1133 ramal 110
> * [EMAIL PROTECTED]
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
--
< 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
[delphi-br] TcpServer
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
[delphi-br] TcpServer
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
