Delphi中没有vector怎么来代替这个

例一:     动态数组     var   fields:   array   of   integer;         Setlenght(fields)//定义长度                 例二:     var     button:array   of   TButton;  ...

2009-07-03 11:56:00

阅读数:1298

评论数:0

indy的UDP传输的演示源码

客户端:varcmd: string;ASize, TotalSize: Int64;AFileStream: TFileStream;beginIdTCPClient1.Host := Edit1.Text; //连接主机IdTCPClient1.Port := StrToIntDef(Edit...

2009-07-03 11:22:00

阅读数:912

评论数:0

提示
确定要删除当前文章?
取消 删除
关闭
关闭