Este es un programa de comunicación para sentirse bien que incluye:
1. El formato del paquete de datos lo define usted mismo.
Todas las definiciones y clases principales de comunicación se encuentran en la carpeta COMM.
2. Puede manejar situaciones en las que una gran cantidad de clientes se comunican al mismo tiempo. El cliente y el servidor comparten el mismo objeto de comunicación y pueden realizar una transmisión mutua.
3. Todos los detalles de la comunicación están encapsulados en varias clases comunes, ocultando todos los detalles de procesamiento de la comunicación interactiva, como el procesamiento de desconexión de paquetes, la retransmisión de tiempo de espera y otras funciones.
4. La comunicación de datos y las aplicaciones específicas de datos están completamente separadas y tienen buena escalabilidad. En este ejemplo, solo hacemos un ejemplo de carga de archivos. Puede lograr cualquier función requerida para el control remoto sin cambiar el núcleo de comunicación y no es necesario. Considere los detalles de la comunicación. Para métodos específicos, consulte: Clase TSrvApp_File de la unidad CommSrvApps Simplemente escriba una nueva clase:
TSrvApp_File = clase(TServerAppObject)
público
función ProcessData(ABuf: PChar; ASize: entero): anulación de entero;
fin;
A través de las clases anteriores combinadas con la clase central de comunicación, la transmisión remota de un archivo en tiempo real es tan simple como copiarlo.
otro:
Este programa es un ejemplo de aplicación de intercambio de datos en una solución de cadena de supermercados que desarrollé yo mismo, por lo que hay mucho código en el cliente y el servidor, pero la mayor parte no tiene nada que ver con la comunicación en sí. conecte la carpeta local local a la carpeta remota remota. Los archivos .rs se transfieren entre sí.
Si tiene alguna sugerencia, visite www.acreport.com para comunicarse o escríbame: [email protected]
Autor: shaoyy