开始折腾diocp+rpc! 为DeWeb做点技术储备

碧树西风 17天前 242

20181030
-
在天地弦的帮助下,第一个Diocp_RPC折腾成功了

注意以下几点
1 mysql安装成功后,需要手动新建数据库,默认名称为:mis

2 需要用新的mis_new.sql新建表和字段

3 天地弦还修改了JS中的一文件

最新回复 (1)
  • 碧树西风 17天前
    引用 2
    procedure TdmService.OnRpcDefaultExecute(pvRPCContext:TDiocpRPCContext);
    var
      lvFile:String;
      lvRequest:TDiocpHttpRequest;
    begin
      lvFile := FHomePath + 'webroot' + pvRPCContext.Request.RequestURI;
      if FileExists(lvFile) then
      begin
        pvRPCContext.Request.ResponseAFileEx(lvFile);
      end else
      begin
        lvRequest:=pvRPCContext.Request;
        lvRequest.Response.WriteString(Format('hello 你好, %s:%d<br>', [lvRequest.Connection.RemoteAddr, lvRequest.Connection.RemotePort]));
        lvRequest.Response.WriteString('<br>');
        lvRequest.SendResponse();
        lvRequest.DoResponseEnd();
        lvRequest.Connection.ResponseState := Response_state_done;
      end;
    
    
    end;

    请问@D10.天地弦

    如果多客户端提高多个请求, 应该可以response到原请求的客户端吧?

返回