unitUnit1; interface uses Winapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics, Vcl.Controls,Vcl.Forms,Vcl.Dialogs,Vcl.StdCtrls,Vcl.Buttons; type TForm1=class(TForm) Memo1:TMemo; BitBtn1:TBitBtn; procedureFormCreate(Sender:TObject); private {Privatedeclarati...

涉及的重要类REST.Json，REST.JsonReflect，REST.Json.Interceptors,REST.Json.Types单元中。 一、TJson类 最简单的一个类，提供了JSON->OBJECT和OBJECT->JSON几个方法，方法有TJsonOptions参数，如：    classfunctionObjectToJsonObject(AObject:TObject;AOptions:TJsonOptions=CDefaultOptions):TJSONObject; type TJsonOption=(joIgnoreEm...

关于TJSONConverters的使用 unitUnit1; interface uses Winapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics, Vcl.Controls,Vcl.Forms,Vcl.Dialogs,Vcl.StdCtrls,Vcl.Buttons,Rest.JSON.Types,Rest.JsonReflect; type TForm1=class(TForm) Memo1:TMemo; procedureFormCreate(Sende...

mormot2框架中有个THttpServer类，它有一个Router属性，定义如下： propertyRouter:TUriRouterreadfRoute; Router是添加路由的入口点，它有和http协议对应的get,post,put,delete等方法，这些方法可以添加路由，下面常用的get方法定义。 procedureGet(constaUri:RawUtf8;constaExecute:TOnHttpServerRequest);overload; TOnHttpServerRequest=function(Ctxt:THttpServerRequestAbstract...