kevin8093:
你是怎么实现的?
/////////////////////////////////////////////////////////////
再加入ServerSocket(Server端),ClientSocket(Client端),当服务端AfterUpdateData中
写入:
for i:=0 to Client_Number-1do
begin
ServerSocket.Socket.Connections.SendText('Client Refresh');
end;
在Client端中的ClientSocket的OnRead事件中:
var str:string;
begin
str:=Socket.ReceiveText;
if str='Client Refresh' then
begin
ClientDataSet.Close;
ClientDataSet.CommandText:='select * from table';
ClientDataSet.Open;
end;
end;
/////////////////////////////////////////
如果这样一来要发布给所有用户,速度太慢,我想只对某一个(或几个)用户发布信息。