1,INewService的AllowExecuteSQL設置為true。NewService_Impl單元右擊,屬性編輯器里面設置。
2,具體代碼如下。需要引入服務端定義接口的單元。
var
FService:INewService;
aRow: Integer;
begin
FService := ClientDataModule.RemoteService as INewService;
aRow := FService.SQLExecuteCommand('update stu set name = concat(name,''2'')');
ShowMessage(IntToStr(aRow));
end;