delphi:如何把由\r\n隔开的一串字符写入数据库

来源：百度知道 编辑：UC知道 时间：2024/07/02 08:14:58
例如：event\r\nid\r\nname\r\ntime\r\nplace\r\n
检测到event之后证明这是一个新的消息的开始，需要把id写入第一列，name写入第二列，time写入第三列，place写入第四列，这都在同一行，请问如何实现呢，谢谢大家了！！！
消息是另一台主机经由udp发送过来的一串字符，各组成信息以回车换行（\r\n）分隔，我是用的IdUDPClient和IdUDPServer来实现两台主机间的发送与接收的。
例如接收到的消息为：event\r\nid\r\nname\r\ntime\r\nplace\r\n

1.如何判断一个新消息的开始呢？就是怎么鉴别‘event’，因为会发送很多条消息，检测到‘event’,则这一条消息分项写入数据库的一行，再检测到‘event’,则这条消息分项写入数据库的另一行，等等。
2. 检测到event之后证明这是一个新的消息的开始，需要把id写入第一列，name写入第二列，time写入第三列，place写入第四列，这都在同一行.

这两方面如何实现呢？谢谢大家了！！！

var
s:String;
i:Integer;
begin
s:='event\r\nid\r\nname\r\ntime\r\nplace\r\n';
for i:=0 to ADOQuery1.FieldCount-1 do
begin
ADOQuery1.Fields.Fields[i].Value:=copy(s,1,pos('\',s)-1);
Delete(s,1,pos('\',s)+3);
end;
end;

你的消息从哪里得来呢?你再说清一点````

呵呵，不好意思，没有弄过UDP之类的东西。看来只能帮你到这里了。