Delphi/delphimvcframework
1
0
Fork 0
mirror of https://github.com/danieleteti/delphimvcframework.git synced 2024-11-15 15:55:54 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Update README.md

Browse Source
This commit is contained in:
Daniele Teti 2015-06-16 10:39:46 +02:00
parent 965c945a7a
commit 400b6ab69a
1 changed files with 21 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
README.md
View File

@ -103,13 +103,21 @@ type
[MVCHTTPMethod([httpGET])] [MVCHTTPMethod([httpGET])]
procedure GetUsers(CTX: TWebContext); procedure GetUsers(CTX: TWebContext);
//The following action will be with a POST or PUT request like the following //The following action will be with a PUT request like the following
//http://myserver.com/users/3 //http://myserver.com/users/3
//and in the request body there should be a serialized TUser //and in the request body there should be a serialized TUser
[MVCPath('/($id)')] [MVCPath('/($id)')]
[MVCProduce('application/json')] [MVCProduce('application/json')]
[MVCHTTPMethod([httPOST, httpPUT])] [MVCHTTPMethod([httpPUT])]
procedure UpdateOrCreateUser(CTX: TWebContext); procedure UpdateUser(CTX: TWebContext);
//The following action will respond to a POST request like the following
//http://myserver.com/users
//and in the request body there should be the new user to create as json
[MVCPath]
[MVCProduce('application/json')]
[MVCHTTPMethod([httpPOST])]
procedure CreateUser(CTX: TWebContext);
end; end;
@ -128,7 +136,7 @@ begin
Render(User); Render(User);
end; end;
procedure TUsersController.UpdateOrCreateUser(CTX: TWebContext); procedure TUsersController.UpdateUser(CTX: TWebContext);
var var
User: TUser; User: TUser;
begin begin
@ -137,6 +145,15 @@ begin
Render(User); Render(User);
end; end;
procedure TUsersController.CreateUser(CTX: TWebContext);
var
User: TUser;
begin
User := CTX.Request.BodyAs<TUser>;
CreateUser(User);
Render(User);
end;
end. end.
``` ```