- 博客(2)
- 资源 (2)
- 收藏
- 关注
原创 Delphi中没有vector怎么来代替这个
例一: 动态数组 var fields: array of integer; Setlenght(fields)//定义长度 例二: var button:array of TButton; i,rows:integer; begin rows:=10; SetL
2009-07-03 11:56:00 1894
转载 indy的UDP传输的演示源码
客户端:varcmd: string;ASize, TotalSize: Int64;AFileStream: TFileStream;beginIdTCPClient1.Host := Edit1.Text; //连接主机IdTCPClient1.Port := StrToIntDef(Edit2.Text, 9925); //端口IdTCPClient1.Connect; //连接tryIdT
2009-07-03 11:22:00 1218
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人