Estoy trantando que mi aplicacion cree, modifica, consulte y borre registro en una clase que existe en el servicio PARSE.COM, en los ejemplos de la documetacion del sitio, muestran como hacer uso de API REST, y los ejemplos estan en Curl, solo he logrado hacer que se agreguen registro a una clase, con este ejemplo:
procedure TForm1.btEnviarClick(Sender: TObject); begin Curl.URL := 'https://api.parse.com/1/classes/Estudiantes'; Curl.HttpHeader.Add('X-Parse-Application-Id: xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx'); Curl.HttpHeader.Add('X-Parse-REST-API-Key: xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx'); Curl.HttpHeader.Add('Content-Type: application/json'); Curl.PostFields:= '{"Apellidos":"' + edApellidos.Text + '","Nombres":"' + edNombre.Text + '","Telefono":"' + edTelefono.Text + '"}'; if not Curl.Perform then ShowMessage(Curl.ErrorString); end;
ese codigo anterior me funciona perfecto, pues me agrega el registro, correctamente y me retorna el ObjectId del registro agregado, por ejemplo: xWWnyTpOux
ahora bien si deseo hacer una modificacion a ese registro con ese ObjectId (xWWnyTpOux), segun la ayuda de PARSE, debo de usar un comando PUT y el problema es que no he econtrado como enviar un comando PUT con TCurl desde delphi, al igual que otros comandos como son: GET, DELETE, etc. a continuacion los ejemplo del manual, y que no he podido convertir a delphi, si alguien me puede indicar como hacerlo, me seria de mucha ayuda y gracias por adelantado.
Estos son los comando del manual en CURL:
GET: (Retrieving objects)
curl -X GET \ -H "X-Parse-Application-Id: Application_ID" \ -H "X-Parse-REST-API-Key: REST_API_KEY" \ https://api.parse.com/1/classes/GameScore/Ed1nuqPvcm
PUT: (Updating objects)
curl -X PUT \ -H "X-Parse-Application-Id: Application_ID" \ -H "X-Parse-REST-API-Key: REST_API_KEY" \ -H "Content-Type: application/json" \ -d '{"score":73453}' \ https://api.parse.com/1/classes/GameScore/Ed1nuqPvcm
DELETE: (Deleting objects)
curl -X DELETE \ -H "X-Parse-Application-Id: Application_ID" \ -H "X-Parse-REST-API-Key: REST_API_KEY" \ https://api.parse.com/1/classes/GameScore/Ed1nuqPvcm
INCREMENT A FIELD (COUNTER):
curl -X PUT \ -H "X-Parse-Application-Id: Application_ID" \ -H "X-Parse-REST-API-Key: REST_API_KEY" \ -H "Content-Type: application/json" \ -d '{"score":{"__op":"Increment","amount":1}}' \ https://api.parse.com/1/classes/GameScore/Ed1nuqPvcm
WORKING WITH ARRAY:
curl -X PUT \ -H "X-Parse-Application-Id: Application_ID" \ -H "X-Parse-REST-API-Key: REST_API_KEY" \ -H "Content-Type: application/json" \ -d '{"skills":{"__op":"AddUnique","objects":["flying","kungfu"]}}' \ https://api.parse.com/1/classes/GameScore/Ed1nuqPvcm
Gracias,
Rafael