Delphi ActiveX
Delphi ActiveX
Lightspeed - Create a Product
See more Lightspeed Examples
Create a new product based on the given parameters.Chilkat Delphi ActiveX Downloads
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Chilkat_TLB;
...
procedure TForm1.Button1Click(Sender: TObject);
var
success: Integer;
http: TChilkatHttp;
json: TChilkatJsonObject;
resp: TChilkatHttpResponse;
sbResponseBody: TChilkatStringBuilder;
jResp: TChilkatJsonObject;
respStatusCode: Integer;
productId: Integer;
productCreatedAt: WideString;
productUpdatedAt: WideString;
productIsVisible: Integer;
productVisibility: WideString;
productHasMatrix: Integer;
productData01: WideString;
productData02: WideString;
productData03: WideString;
productUrl: WideString;
productTitle: WideString;
productFulltitle: WideString;
productDescription: WideString;
productContent: WideString;
productSet: Integer;
productBrandResourceId: Integer;
productBrandResourceUrl: WideString;
productBrandResourceLink: WideString;
productCategoriesResourceId: Integer;
productCategoriesResourceUrl: WideString;
productCategoriesResourceLink: WideString;
productDeliverydateResourceId: Integer;
productDeliverydateResourceUrl: WideString;
productDeliverydateResourceLink: WideString;
productImage: Integer;
productImages: Integer;
productRelationsResourceId: Integer;
productRelationsResourceUrl: WideString;
productRelationsResourceLink: WideString;
productMetafieldsResourceId: Integer;
productMetafieldsResourceUrl: WideString;
productMetafieldsResourceLink: WideString;
productReviewsResourceId: Integer;
productReviewsResourceUrl: WideString;
productReviewsResourceLink: WideString;
productType: Integer;
productAttributesResourceId: Integer;
productAttributesResourceUrl: WideString;
productAttributesResourceLink: WideString;
productSupplierResourceId: Integer;
productSupplierResourceUrl: WideString;
productSupplierResourceLink: WideString;
productTagsResourceId: Integer;
productTagsResourceUrl: WideString;
productTagsResourceLink: WideString;
productVariantsResourceId: Integer;
productVariantsResourceUrl: WideString;
productVariantsResourceLink: WideString;
productMovementsResourceId: Integer;
productMovementsResourceUrl: WideString;
productMovementsResourceLink: WideString;
begin
success := 0;
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
http := TChilkatHttp.Create(Self);
// Implements the following CURL command:
// curl -u API_KEY:API_SECRET \
// -H "Content-Type: application/json" \
// -X POST \
// -d '{
// "product": {
// "visibility": "visible",
// "data01": "",
// "data02": "",
// "data03": "",
// "title": "Lookin Sharp T-Shirt",
// "fulltitle": "Lookin Sharp T-Shirt",
// "description": "Description of the Lookin Sharp T-Shirt",
// "content": "Long Description of the Lookin Sharp T-Shirt",
// "deliverydate": 6488,
// "supplier": 78794,
// "brand": 1171202
// }
// }' \
// "https://api.webshopapp.com/en/products.json"
// Use the following online tool to generate HTTP code from a CURL command
// Convert a cURL Command to HTTP Source Code
http.Login := 'API_KEY';
http.Password := 'API_SECRET';
// Use this online tool to generate code from sample JSON:
// Generate Code to Create JSON
// The following JSON is sent in the request body.
// {
// "product": {
// "visibility": "visible",
// "data01": "",
// "data02": "",
// "data03": "",
// "title": "Lookin Sharp T-Shirt",
// "fulltitle": "Lookin Sharp T-Shirt",
// "description": "Description of the Lookin Sharp T-Shirt",
// "content": "Long Description of the Lookin Sharp T-Shirt",
// "deliverydate": 6488,
// "supplier": 78794,
// "brand": 1171202
// }
// }
json := TChilkatJsonObject.Create(Self);
json.UpdateString('product.visibility','visible');
json.UpdateString('product.data01','');
json.UpdateString('product.data02','');
json.UpdateString('product.data03','');
json.UpdateString('product.title','Lookin Sharp T-Shirt');
json.UpdateString('product.fulltitle','Lookin Sharp T-Shirt');
json.UpdateString('product.description','Description of the Lookin Sharp T-Shirt');
json.UpdateString('product.content','Long Description of the Lookin Sharp T-Shirt');
json.UpdateInt('product.deliverydate',6488);
json.UpdateInt('product.supplier',78794);
json.UpdateInt('product.brand',1171202);
http.SetRequestHeader('Content-Type','application/json');
// Use the correct cluster for your shop. Here are the choices:
// eu1 https://api.webshopapp.com/en/
// us1 https://api.shoplightspeed.com/en/
resp := TChilkatHttpResponse.Create(Self);
success := http.HttpJson('POST','https://api.webshopapp.com/en/products.json',json.ControlInterface,'application/json',resp.ControlInterface);
if (success = 0) then
begin
Memo1.Lines.Add(http.LastErrorText);
Exit;
end;
sbResponseBody := TChilkatStringBuilder.Create(Self);
resp.GetBodySb(sbResponseBody.ControlInterface);
jResp := TChilkatJsonObject.Create(Self);
jResp.LoadSb(sbResponseBody.ControlInterface);
jResp.EmitCompact := 0;
Memo1.Lines.Add('Response Body:');
Memo1.Lines.Add(jResp.Emit());
respStatusCode := resp.StatusCode;
Memo1.Lines.Add('Response Status Code = ' + IntToStr(respStatusCode));
if (respStatusCode >= 400) then
begin
Memo1.Lines.Add('Response Header:');
Memo1.Lines.Add(resp.Header);
Memo1.Lines.Add('Failed.');
Exit;
end;
// Sample JSON response:
// (Sample code for parsing the JSON response is shown below)
// {
// "product": {
// "id": 20974460,
// "createdAt": "2019-05-28T20:14:26+00:00",
// "updatedAt": "2019-05-28T20:14:26+00:00",
// "isVisible": true,
// "visibility": "visible",
// "hasMatrix": false,
// "data01": "",
// "data02": "",
// "data03": "",
// "url": "lookin-sharp-t-shirt",
// "title": "Lookin' Sharp T-Shirt",
// "fulltitle": "Lookin' Sharp T-Shirt",
// "description": "Description of the Lookin' Sharp T-Shirt",
// "content": "<p>Long Description of the Lookin' Sharp T-Shirt</p>",
// "set": false,
// "brand": {
// "resource": {
// "id": 1171202,
// "url": "brands/1171202",
// "link": "https://api.shoplightspeed.com/us/brands/1171202.json"
// }
// },
// "categories": {
// "resource": {
// "id": false,
// "url": "categories/products?product=20974460",
// "link": "https://api.shoplightspeed.com/us/categories/products.json?product=20974460"
// }
// },
// "deliverydate": {
// "resource": {
// "id": 6488,
// "url": "deliverydates/6488",
// "link": "https://api.shoplightspeed.com/us/deliverydates/6488.json"
// }
// },
// "image": false,
// "images": false,
// "relations": {
// "resource": {
// "id": false,
// "url": "products/20974460/relations",
// "link": "https://api.shoplightspeed.com/us/products/20974460/relations.json"
// }
// },
// "metafields": {
// "resource": {
// "id": false,
// "url": "products/20974460/metafields",
// "link": "https://api.shoplightspeed.com/us/products/20974460/metafields.json"
// }
// },
// "reviews": {
// "resource": {
// "id": false,
// "url": "reviews?product=20974460",
// "link": "https://api.shoplightspeed.com/us/reviews.json?product=20974460"
// }
// },
// "type": false,
// "attributes": {
// "resource": {
// "id": false,
// "url": "products/20974460/attributes",
// "link": "https://api.shoplightspeed.com/us/products/20974460/attributes.json"
// }
// },
// "supplier": {
// "resource": {
// "id": 78794,
// "url": "suppliers/78794",
// "link": "https://api.shoplightspeed.com/us/suppliers/78794.json"
// }
// },
// "tags": {
// "resource": {
// "id": false,
// "url": "tags/products?product=20974460",
// "link": "https://api.shoplightspeed.com/us/tags/products.json?product=20974460"
// }
// },
// "variants": {
// "resource": {
// "id": false,
// "url": "variants?product=20974460",
// "link": "https://api.shoplightspeed.com/us/variants.json?product=20974460"
// }
// },
// "movements": {
// "resource": {
// "id": false,
// "url": "variants/movements?product=20974460",
// "link": "https://api.shoplightspeed.com/us/variants/movements.json?product=20974460"
// }
// }
// }
// }
// Sample code for parsing the JSON response...
// Use the following online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON
productId := jResp.IntOf('product.id');
productCreatedAt := jResp.StringOf('product.createdAt');
productUpdatedAt := jResp.StringOf('product.updatedAt');
productIsVisible := jResp.BoolOf('product.isVisible');
productVisibility := jResp.StringOf('product.visibility');
productHasMatrix := jResp.BoolOf('product.hasMatrix');
productData01 := jResp.StringOf('product.data01');
productData02 := jResp.StringOf('product.data02');
productData03 := jResp.StringOf('product.data03');
productUrl := jResp.StringOf('product.url');
productTitle := jResp.StringOf('product.title');
productFulltitle := jResp.StringOf('product.fulltitle');
productDescription := jResp.StringOf('product.description');
productContent := jResp.StringOf('product.content');
productSet := jResp.BoolOf('product.set');
productBrandResourceId := jResp.IntOf('product.brand.resource.id');
productBrandResourceUrl := jResp.StringOf('product.brand.resource.url');
productBrandResourceLink := jResp.StringOf('product.brand.resource.link');
productCategoriesResourceId := jResp.BoolOf('product.categories.resource.id');
productCategoriesResourceUrl := jResp.StringOf('product.categories.resource.url');
productCategoriesResourceLink := jResp.StringOf('product.categories.resource.link');
productDeliverydateResourceId := jResp.IntOf('product.deliverydate.resource.id');
productDeliverydateResourceUrl := jResp.StringOf('product.deliverydate.resource.url');
productDeliverydateResourceLink := jResp.StringOf('product.deliverydate.resource.link');
productImage := jResp.BoolOf('product.image');
productImages := jResp.BoolOf('product.images');
productRelationsResourceId := jResp.BoolOf('product.relations.resource.id');
productRelationsResourceUrl := jResp.StringOf('product.relations.resource.url');
productRelationsResourceLink := jResp.StringOf('product.relations.resource.link');
productMetafieldsResourceId := jResp.BoolOf('product.metafields.resource.id');
productMetafieldsResourceUrl := jResp.StringOf('product.metafields.resource.url');
productMetafieldsResourceLink := jResp.StringOf('product.metafields.resource.link');
productReviewsResourceId := jResp.BoolOf('product.reviews.resource.id');
productReviewsResourceUrl := jResp.StringOf('product.reviews.resource.url');
productReviewsResourceLink := jResp.StringOf('product.reviews.resource.link');
productType := jResp.BoolOf('product.type');
productAttributesResourceId := jResp.BoolOf('product.attributes.resource.id');
productAttributesResourceUrl := jResp.StringOf('product.attributes.resource.url');
productAttributesResourceLink := jResp.StringOf('product.attributes.resource.link');
productSupplierResourceId := jResp.IntOf('product.supplier.resource.id');
productSupplierResourceUrl := jResp.StringOf('product.supplier.resource.url');
productSupplierResourceLink := jResp.StringOf('product.supplier.resource.link');
productTagsResourceId := jResp.BoolOf('product.tags.resource.id');
productTagsResourceUrl := jResp.StringOf('product.tags.resource.url');
productTagsResourceLink := jResp.StringOf('product.tags.resource.link');
productVariantsResourceId := jResp.BoolOf('product.variants.resource.id');
productVariantsResourceUrl := jResp.StringOf('product.variants.resource.url');
productVariantsResourceLink := jResp.StringOf('product.variants.resource.link');
productMovementsResourceId := jResp.BoolOf('product.movements.resource.id');
productMovementsResourceUrl := jResp.StringOf('product.movements.resource.url');
productMovementsResourceLink := jResp.StringOf('product.movements.resource.link');
end;