Recognizing and identifying WiFi and LAN networks

This work must be done in Delphi. Short Description: Automatically recognize available networks and network changes, trigger events (run functions) based on the recognized networks. Complete description: I need a possibility to react on changes occuring in the network the computer is in. The Demo UI should consist only of two buttons and one Memo. One button starts the event listener the other one stops it. When the event listener is active als network changes (as described below) should be logged in the Memo. That event listener should run without any additional user interaction and without using any special system ressources. (too much RAM or CPU) -> WiFi: Get the event handle / trigger for the event when Windows recognizes new WiFi networks. When a change occurs (or Windows simply scans all available WiFi networks by itself) get the SSIDs and MACs of the WiFi networks and list them. --> MUST run on XP SP2 and newer (Vista, 7) -> LAN: 1. Recognize and log LAN changes: cable disconnect, cable connect, recognizing network (DHCP retrieving),... 2. Recognize the connected network! Windows Vista does that by getting the MAC address of the DHCP server or gateway. (Do some research on that). --> MUST run on Win2000 and newer (XP, Vista, 7) Based on your work I should be able to perform different tasks depending on the network the computer is in.