Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Delphi ActiveX) Akeneo: Create New Attribute GroupDemonstrates how to create a new attribute group.
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 http: TChilkatHttp; json: TChilkatJsonObject; url: WideString; resp: IChilkatHttpResponse; begin // This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. http := TChilkatHttp.Create(Self); // Use your previously obtained access token. // See Get Akeneo Access Token http.AuthToken := 'access_token'; // Build the following JSON to be sent in the request body: // Use this online tool to generate the code from sample JSON: // Generate Code to Create JSON // { // "code": "marketing", // } json := TChilkatJsonObject.Create(Self); json.UpdateString('code','marketing'); json.EmitCompact := 0; // Show the JSON to be sent.. Memo1.Lines.Add(json.Emit()); url := 'http://pim.my-akeneo-site.com/api/rest/v1/attribute-groups'; resp := http.PostJson3(url,'application/json',json.ControlInterface); if (http.LastMethodSuccess <> 1) then begin Memo1.Lines.Add(http.LastErrorText); Exit; end; // Success is a 201 response status code with an empty body. Memo1.Lines.Add('Response Status Code: ' + IntToStr(resp.StatusCode)); Memo1.Lines.Add('Response Body: '); Memo1.Lines.Add(resp.BodyStr); end; |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.