易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi接受UDP数据包

谁能给我个简单的例子  
delphi接受UDP数据包的 要接收数组的
最好是用 IdTCPserver1的
最好还有发送的部分
本人菜鸟，谢谢各位了！！

楼上给的是TCP的吧 我要UDP的  
谢谢！！
引用
最好是用 IdTCPserver1的

这不是你写的吗
对不起我写错了 
我要IdUDPClient1

不好意思

procedure TForm1.Button1Click(Sender: TObject);
var
  a:array[0..1] of char;
begin
  a[0]:='A';
  a[1]:='B';
  self.IdUDPClient1.SendBuffer('127.0.0.1',1984,a,sizeof(a));
end;
谢谢楼上

如果我想接受数据时候 直接把接收到的数据赋值给数组 要怎么做？
引用
谢谢楼上

如果我想接受数据时候 直接把接收到的数据赋值给数组 要怎么做？

 AData: TStream,这个参数，你可以用Stream的写缓冲区方法把数据写到数组中
引用
引用 7 楼 lazijiding 的回复:
谢谢楼上

如果我想接受数据时候 直接把接收到的数据赋值给数组 要怎么做？

AData: TStream,这个参数，你可以用Stream的写缓冲区方法把数据写到数组中

不太懂 写出来吧 谢谢！！
procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
  ABinding: TIdSocketHandle);

var
  sStream: TStringStream;
  a:array[0..1] of char;
  i:integer;
begin
&nb


相关问答：

Delphi怎么取返回内容中的指定部分.

返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......

这个SQL语句有什么问题? - Delphi / 非技术区

select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )

开盘价比收盘价低两分以下的情况

Mark!!!!!!

se ......

Delphi中用spcomm发送短信

Delphi中用spcomm发送和接收中文、英文短信的程序代码 ，，哪位大虾有帮帮忙
  小弟不胜感激.........
  最好是用AT指令集来实现串口通信的！！！！
是不是用sim508模块啊 � ......

问2个delphi的小问题

listbox的Ondrawltem事件在什么情况下触发？
var
thepchar:array[0..79] of char;
thestring:string;
begin
...
strpcopy(thepchar,thestring);
longint(@thepchar);
......
end;
我想问
strpcopy(thepch ......

Delphi版历任版主照片（绝密，申请加精！）

不好意思，You are fooled！
哈哈，愚人节快乐！我要能全搞到，我就去国家安全局了！
呵，你还真像安全局的

b4

哈哈！

真好

b4

我倒

哈哈！


今天一定要敲倒一個火星的。

这里有很 ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号