UC知道delphi 数组与记录
来源：百度知道 编辑：UC知道 时间：2024/06/07 20:40:08
如何将一条记录存入一个动态数组里面呢?谢谢了!
最好是给个例子 !
比如:
有一条这样的记录
type TableRecord = record
CustNo:integer;
Company:String;
Addr1:String;
Addr2:String;
end;
var
Customer:array of TableRecord; //数组
如何实现呢 ?
之后又是如何实现将这个动态数组存入缓冲区,之后打包发送到服务端 ?
(这个问题可以先不回答)
谢谢了!
我现在想实现的是从客户端(client)的一个数据库中读一条记录,之后将这条记录发送到服务器端(server)将改记录存入服务器端的数据库中!
如何将记录存入缓存
最好是给个例子 !
比如:
有一条这样的记录
type TableRecord = record
CustNo:integer;
Company:String;
Addr1:String;
Addr2:String;
end;
var
Customer:array of TableRecord; //数组
如何实现呢 ?
之后又是如何实现将这个动态数组存入缓冲区,之后打包发送到服务端 ?
(这个问题可以先不回答)
谢谢了!
我现在想实现的是从客户端(client)的一个数据库中读一条记录,之后将这条记录发送到服务器端(server)将改记录存入服务器端的数据库中!
如何将记录存入缓存
Customer[0].CustNo:=1;
Customer[0].Company:='company';
Customer[0].Addr1:='Addr1';
Customer[0].Addr2:='Addr2';
那就看你用的是什么控件了，我就用indytcp控件说吧。
客户端发送：idtcpclient.writebuffer(customer[0],sizeof(customer[0]),true)
服务端接收：是在idtcpserverexecute事件中操作的
Athread.connection.readbuffer(customer[0],sizeof(customer[0]))
上面的可以用，但是你说的打包发送到服务端是什么意思，说具体点！