Y
yzykjh
Unregistered / Unconfirmed
GUEST, unregistred user!
例:在客户端删除ClientDataSet中的记录,代码放在应用服务器端,如何实际或解决这类问题?如果必须放在客户端,那三层不就成了两层。
客户端代码如下:
if Application.MessageBox('是否删除记录?','提示信息',
MB_YESNO+MB_ICONQUESTION+MB_DEFBUTTON2)=ID_YES then
begin
try
DM_Client.CDSBargain.Delete;
DM_Client.CDSBargain.ApplyUpdates(-1);
except
Application.MessageBox('发现异常!','提示信息',MB_ICONERROR);
end;
end;
如何把以上代码修改成放在应用服务器端的代码,做到业务分离。
客户端代码如下:
if Application.MessageBox('是否删除记录?','提示信息',
MB_YESNO+MB_ICONQUESTION+MB_DEFBUTTON2)=ID_YES then
begin
try
DM_Client.CDSBargain.Delete;
DM_Client.CDSBargain.ApplyUpdates(-1);
except
Application.MessageBox('发现异常!','提示信息',MB_ICONERROR);
end;
end;
如何把以上代码修改成放在应用服务器端的代码,做到业务分离。