Архив исходников программ, модулей и компонентов на Delphi


Начальная страница

Поиск по базе



Операционная система
Настройка приложения
Взаимодействия приложений
Файлы и директории
Строки и символы
Математика
Базы данных
Интернет и сеть
Мультимедиа
Аппаратная часть
VCL
Другие разделы [0]
 

Количество записей в базе - 537
Сегодня добавлено – 0

Локальная сеть


Добавить код в данный раздел
 Получает список доступных сетевых ресурсов (шар) и выводит его в виде списка

procedure Get_shares(IP: String; List: TStrings);

Прислал: Николай (Наро-Фоминск) ( 17 августа 2004 г. )
Количество просмотров: 2642


 Отправка сообщения а ля NetSend (не требует рабочего messenger. все автономно. для любой винды)

unit UberNetSend;

Прислал: Uber ( 4 мая 2004 г. )
Количество просмотров: 2699


 Отправляет сообщение по локальной сети (как команда Net Send)

function NetSend(const sTo, sMessage: string): Boolean;

Прислал: Num Lock ( 13 марта 2003 г. )
Количество просмотров: 4773


 Подключение сетевого диска.

function MapNetworkDrive(const NetworkPath: string; Letter: Char; Option: TMapNetworkDriveOption = []): DWORD;

Прислал: Mystic (Харьков) ( 5 марта 2003 г. )
Количество просмотров: 2742


 Выводит Список компьютеров в локальной сети

function TNetForm.FillNetLevel(xxx: PNetResource; List:TListItems): Word;

Прислал: Mirag (Mirag) ( 14 ноября 2002 г. )
Количество просмотров: 4974


 Получение списка серверов в локальной сети

unit NetSrvList; (TServerList = class(TObject))

Прислал: vuk ( 26 апреля 2002 г. )
Количество просмотров: 4764




Добавить код в данный раздел

Наверх ▲