Текущий архив: 2005.02.27;
Скачать: CL | DM;
Вниз
TIdUDPServer Найти похожие ветки
← →
Змей © (2004-12-14 14:06) [0]uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, IdBaseComponent, IdComponent, IdUDPBase, IdUDPServer,
IdUDPClient, StdCtrls;
type
TForm1 = class(TForm)
IdUDPServer1: TIdUDPServer;
IdUDPClient1: TIdUDPClient;
Edit1: TEdit;
Memo1: TMemo;
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
вот я пишу любой код в IdUDPServer1UDPRead и ABinding: TIdSocketHandle вот после этого
выделяет красным че за ошибка то? написал тока var s:string;
Thanks
← →
Edjo (2004-12-14 14:13) [1]добавь в uses idSocketHandle
по книге horrific"a следуешь ;)
я как раз тоже чат для локалки начал делать... если че пиши, обменяемся идеями!
← →
Змей © (2004-12-14 14:50) [2]я писал на сокетах
а вот udp я вообще не знаю вот в книжке нашел примерчик простенькый попробую ченидь сотворить
Страницы: 1 вся ветка
Текущий архив: 2005.02.27;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.097 c
