La aplicación de control remoto a la enseñanza se ha convertido en un medio importante de enseñanza computarizada en la actualidad. Debe haber muchos internautas que quieran comprender los principios de programación de este método de enseñanza en línea, ¿verdad? Aquí utilizaremos un programa de control remoto simple como ejemplo para ilustrar los principios básicos de esta programación de red. Este programa toma la programación de Delphi como ejemplo.
El mecanismo de trabajo de este programa es muy simple. Según este principio, escribimos dos programas, uno de los cuales es el controlador y el otro es el controlado, y ejecutamos estos dos programas en dos máquinas diferentes. operación (como reiniciar en este ejemplo).
Hay dos tipos de controles en Delphi que pueden lograr el propósito anterior. Un tipo es que el controlador usa Clientsocket, la parte controlada usa Serversocket (tanto en la página de Internet), y el otro tipo es que ambas partes usan NMUDP (ambas en la página de Fastnet). Sabemos que la transmisión de la red no es confiable, es decir, los datos transmitidos pueden perderse. El protocolo TCP está orientado a la conexión. no está orientado. Dado que la cantidad de datos requeridos para el control no es grande y requiere una alta confiabilidad, el primero se usa generalmente y la descripción del procedimiento es la siguiente:
El primer paso es iniciar el programa del controlador, agregar el control de clientsocket, nombrarlo con control, establecer el atributo de host en la dirección IP de la máquina controlada y el atributo del puerto es 1234 (el puerto se puede configurar a voluntad, pero no Repítelo con algunos puertos predeterminados, como 80, etc.).
El segundo paso es agregar el código de código.
El tercer paso es agregar un botón, establecer la leyenda en "reiniciar" y agregar el código control.socket.sendText ('' reiniciar ''); Esto completa el trabajo del controlador.
El cuarto paso es iniciar el programa de la parte controlada, agregar el control de SerververSocket, nombrarlo subcontrol, establecer el atributo de puerto en 1234 (que es consistente con el puerto de la parte de control) y el atributo activo a True.
Paso 5: Agregue el código al evento OnClientRead del subcontrol ifsocket.Receivetext = '' reiniciar '' Entonces
ExitWindowsex (EWX_REBOOT, 2);
Esto completa el trabajo del código y luego compila estos dos programas para generar dos archivos .exe y los ejecuta en dos máquinas (recuerde ejecutar el programa de máquina controlada en Win98 primero) y presione "Reiniciar" en el botón (botón) , la máquina controlada se reinicia. El reinicio de la máquina de control remoto se implementó correctamente.