A aplicação do controle remoto ao ensino tornou -se um meio importante de ensino computadorizado atualmente. Deve haver muitos internautas que desejam entender os princípios de programação deste método de ensino on -line, certo? Aqui, usaremos um programa simples de controle remoto como exemplo para ilustrar os princípios básicos dessa programação de rede. Este programa leva a programação Delphi como exemplo.
O mecanismo de trabalho deste programa é muito simples. De acordo com esse princípio, escrevemos dois programas, um dos quais é o controlador e o outro é o controlado e executamos esses dois programas em duas máquinas diferentes. operação (como reiniciar neste exemplo).
Existem dois tipos de controles em Delphi que podem atingir o objetivo acima. Um tipo é que o controlador usa o ClientSocket, a parte controlada usa o ServerSocket (tanto na página da Internet), e o outro tipo é que ambas as partes usam o NMUDP (ambos na página FastNet). Sabemos que a transmissão de rede não é confiável, ou seja, os dados transmitidos podem ser perdidos. O protocolo TCP é orientado a conexão. não é orientado. Como a quantidade de dados necessários para o controle não é grande e requer alta confiabilidade, o primeiro é geralmente usado e a descrição do procedimento é a seguinte:
A primeira etapa é iniciar o programa do controlador, adicionar o controle do cliente, nomear o controle, definir o atributo host para o endereço IP da máquina controlada e o atributo da porta é 1234 (a porta pode ser definida à vontade, mas não Repita -o com algumas portas padrão, como 80, etc.).
A segunda etapa é adicionar o controle de código. Open ao evento FormCreate;
A terceira etapa é adicionar um botão, definir a legenda para "reiniciar" e adicionar o código Control.socket.sendText ('' reiniciar ''); Isso completa o trabalho do controlador.
A quarta etapa é iniciar o programa da parte controlada, adicionar o controle do ServerSocket, nomear -o subcontrole, definir o atributo da porta para 1234 (que é consistente com a porta da parte de controle) e o atributo ativo para true.
Etapa 5: Adicione o código ao evento OnClientRead do subcontrole ifSocket.receiveText = '' Reboot '' então
Exitwindowsex (ewx_reboot, 2);
Isso completa o trabalho de código e, em seguida, compila esses dois programas para gerar dois arquivos .exe e executá -los em duas máquinas (lembre -se de executar o programa de máquinas controladas em Win98 primeiro) e pressione "reiniciar" no botão controlador (botão) (botão) , a máquina controlada reinicia. A reinicialização da máquina de controle remoto foi implementada com sucesso.