摘要: TMyData = record id:Integer; Name:Array[0..20] of Char; Sex:Array[0..10] of Char; Age:Byte; Address:Array[0..256] of Char; UpdateTime:double; end;//发送结构体:procedure TForm2.Button2Click(Sender: TObject);var SendData:TMyData;beginSendData.ID:=10;StrPCopy(SendData.Name,'Wyatt');StrPCopy(SendData 阅读全文
posted @ 2011-07-23 16:55 许明吉博客 阅读(2124) 评论(0) 推荐(0) 编辑