Всем доброго здоровьица
столкнулся с такой задачей - получить имя активного сетевого подключения, да же готовую функцию удалось отыскать, кстати вот она:
Определение активного подключения
Возвращает название активного интернет-соединения
Зависимости: RAS
Автор: некий Ajax
Copyright: Ajax
Дата: 27 мая 2002 г.
*****************************************************
Код
function CheckRASConnections: string;
const
MaxEntries = 100;
var
BufSize: Integer;
NumEntries: Integer;
Entries: array[1..MaxEntries] of TRasConn;
begin
Entries[1].dwSize := SizeOf(TRasConn);
Bufsize := SizeOf(TRasConn) * MaxEntries;
RasEnumConnections(@Entries[1], BufSize, NumEntries);
if numentries > 0 then
result := strpas(@Entries[1].szEntryName)
else
Result := 'Disconnected';
end;
//Пример использования:
ShowMessage(CheckRASConnections);
но к сожалению мне не удалось отыскать нужный "TRasConn" модуль, да и в uses как видно ничего не указано, собственно кто встречал такой, или может быть у кого то он есть, выложите пожалуйста.