El truco "Enumerar recursos de red" no funciona en Delphi XE7

[JoAnCa]

Empezado por Neftali

Dependiendo de la versión que tengas de delphi basta con cambiar la definición de hEnum, por:

Código Delphi [-]var hEnum:NativeUInt; ...

Muchas gracias, resuelto con ese cambio. Uso Delphi XE7


Y continuando con el truco, me funciona bien en mi red local (aunque un poco lento), pero quisiera que tambien me funcionara en mis otras subredes.

Por ejemplo:
Mi red local: 192.168.0.1 (ok)
Subred 1: 192.168.1.1 ( ? )
Subred 2: 192.168.2.1
Subred 3: 192.168.3.1
...

Que cambio tendria que hacerle al código?
O este no me servirá y tendré que buscar otro método?