Función que nos da el nombre del PC en la red en Delphi

Unidades necesarias:

uses
  Windows, Messages, ..., WinSock, IdHttp, WinInet;

Función que nos da el nombre del PC en la red:

function LeerNombrePC: string;
var
  Buffer: array[0..255] of char;
  dwLongitud: DWord;
begin
  dwLongitud := 256;

  if GetComputerName( Buffer, dwLongitud ) then
    Result := Buffer
  else
    Result := ''
end;

RED: Redireccionar puertos del Router Inalámbrico Xavi 7768r

1. Entramos en el interfaz del router.
En el navegador web ponemos su dirección: 192.168.1.1
Ponemos:
usuario: 1234
contraseña: 1234

2. Ya estamos dentro del router.

3. Entramos en:

configuration
security

Añadiendo aquí la IP de nuestro ordenador, el tipo de transporte, y puerto a redireccionar.

4.
configuration
security
advanced nat configuration

5.
configuration
save configuration

Así salvaremos la configuración

6.
system
restart router

Reiniciamos el router. Con lo que ya tendremos redireccionados los puertos que queramos.

RED: Testea la velocidad de tu conexión a Internet

En esta página podrás testear la velocidad de tu conexión a Internet:

www.testdevelocidad.es



Requisitos:

Tener Instalado el Flash Player.