Network Connection Name

Как в Delphi да получа името на една (Активната) Network Connection ?

Това, което се показва в Caption на Connection Status dialog-a.
Пък и другите properties на конекцията се опитвам да открия, ама поне името да стане ще е добре

API функциите WNetOpenEnum/WNetEnumResource не ти ли вършат работа?

Май аз не зададох добре въпроса , sorry за което.

Това с map-нати ресурси и т.н. не е проблем.
Но не става дума за такъв тип Connection.
Искам да разбера името на активната връзка, т.е. Dial-up, VPN, LAN или друг тип връзка - онзи индикатор дето се появява долу в tray-а когато е избрано "Show indicator when connected". Като му дадете "Status" и се отваря един диалог с caption "името на конекцията" (например "Dial-up connection 1") където показва Sent packets | Received packets | Properties и т.н.
Това ми трябва.

[линк]

------------------------------
I got a COMPILER, and I'm not afraid to use it!