en el código del truco cambias el nombre del agente y le damos mayor seguridad a la interacción entre el PHP y delphi...
Código Delphi
[-]
hNet:= InternetOpen('DelphiBot', INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);
Código PHP:
if ($_SERVER['HTTP_USER_AGENT'] == "DelphiBot") {
...
} else {
echo "ACCESO DENEGADO";
}