La Web del Programador: Comunidad de Programadores
 
    Pregunta:  19154 - COGER DATOS DE HTML A PROGRAMA DELPHI
Autor:  Pablo V.F.
En una página PHP genero los datos deseados en un servidor web, lo que pretendo es coger esos datos (la página en si), con un programa en delphi. ¿Como hago para pasar esa página a mi programa que estará en culaquier otro ordenador conectado a internet?

  Respuesta:  Óscar Javier García Baudet
Te puedo ayudar en la parte PHP, pero en la parte Delphi debes buscarte tú el código.

La mejor forma es estableciendo un socket y enviar la información por éste. El programa en Delphi debe usar winsockets y quedarse escuchando por un puerto (pondremos en este ejemplo el 6868).

$puerto=6868;
$direccion=gethostbyname('maquina.dominio.com');
$socket=socket(AF_INET,SOCK_STREAM,0);
if ($socket < 0) echo strerror($socket) . "\n";
else echo"Todo bien\n";
// Ahora conectamos con el servidor escrito en Delphi:
$salida = connect($socket, $direccion, $puerto);
if ($salida < 0) echo strerror($salida) . "\n";
else echo "Todo bien\n";
write($socket, $datos_a_enviar_del_formulrio, strlen($datos_a_enviar_del_formulario));
close($socket);

Este es un código experimental en PHP de modo que no confies en que se implemente en versiones futuras de PHP.

Sería más sencillo mandar los datos por email:

mail($correo_destino,$asunto,$datos_a_enviar_del_formulario);

Y posteriormente crear en Delphi un lector de correo que interpretase esa información. Así podríamos recibir información enviada incluso cuando el servidor estaba sin funcionar (caida del sistema o deconexión de la red).

Un saludo y espero que te haya servidor de ayuda.