VPF::CrtSock - модуль для работы с сокетами в Delphi32

Poseidon

Дата 19.5.2005, 00:12 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 4
Всего: 133

CrtSock. Модуль для работы с сокетами.
Совместимость: Delphi 2+

Поддерживает TCP и UDP пакеты.
Не использует winsock.pas, поскольку обращается непосредственно к wsock32.dll.
Набор функций позволяет разрабатывать как клиентские, так и серверные приложения.
Перечень включенных в модуль функций:

Код

// Server side : 
//  - start a server 
//  - wait for a client 
function StartServer(Port:word):integer; 
function WaitClient(Server:integer):integer; 
function WaitClientEx(Server:integer; var ip:string):integer; 

// Client side : 
//  - call a server 
function CallServer(Server:string;Port:word):integer; 

// Both side : 
//  - Assign CRT Sockets 
//  - Disconnect server 
procedure AssignCrtSock(Socket:integer; 
                        Var Input,Output:TextFile); 
procedure Disconnect(Socket:integer); 

// BroadCasting (UDP) 
function StartBroadCast(Port:word):integer; 
function SendBroadCast(Server:integer; 
                       Port:word; s:string):integer; 
function SendBroadCastTo(Server:integer; 
                         Port:word; 
                         ip,s:string):integer; 
function ReadBroadCast(Server:integer; Port:word):string; 
function ReadBroadCastEx(Server:integer; 
                         Port:word; 
                         var ip:string):string; 

// BlockRead 
function SockAvail(Socket:integer):integer; 
function DataAvail(Var F:TextFile):integer; 
Function BlockReadsock(Var F:TextFile; 
                       var s:string):boolean; 

Function send(socket:integer; 
              data:pointer; 
              datalen, 
              flags:integer):integer; stdcall; far; 
Function recv(socket:integer; 
              data:pchar; 
              datalen, 
              flags:integer):integer; stdcall; far;

Дополнительно в комплект входят модули для работы с FTP, HTTP, SMTP, POP3.
В качестве примера приведена демонстрационная программа, использующая все эти возможности.

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Сети \| Следующая тема »