触发一次 OnDataReceive事件,并且NumberByte=-1
解决方案 »
- SQL循环计算
- 如何在MessageBox对话框中的提示信息中使用变量?
- 师兄们,救救我吧
- 大家看看clientdataset的问题.
- 一套delphi6+sqlserver的医院信息管理系统源码换lotus的B/S模式的OA系统源码,请尽快联系。email:[email protected]
- 大家帮忙锁定键盘和鼠标的问题————在线等待!!!????
- 两台电脑,一用猫上网,一用宽带。如何通过我的程序使他们互相获取对方的IP地址?
- 誰能不能弄個delphi5以上的聯機帮助文檔打包下載啊,謝謝
- 我的ADO数据库程序不能在别的电脑上运行,请问怎么做。急!!!!!!!!!!!!!
- 什么控件既能显示文本,又能作为其他控件的容器啊?!
- DbGrid中有针对某个字段的OnChange事件吗?
- 免费pascal和C++:http://www.freepascal.org/和http://www.bloodshed.net/devpascal.html
NumberBytes: Integer; FromIP: String; Port: Integer);
var
ss:tmemorystream;
m:tstrings;
i:integer;
s:string;
begin
s:='';
m:=tstrings.Create;
ss:=tmemorystream.Create;
memo1.Lines.Add('Data Received.');
nmudp1.readstream(ss);
m.LoadFromStream(ss);
for i:=0 to m.Count do
s:=s+m.Strings[i] ;
showmessage(s);
m.Free;
ss.Free;
end;为什么会出现exception?