Gere automaticamente SDKs Pascal nativos a partir de especificações OpenAPI 3.x. Importe, analise e gere clientes de API com tipos seguros — diretamente no IDE do Delphi.
Transforme qualquer especificação OpenAPI em código Pascal pronto para produção, com tipos seguros e suporte a IntelliSense.
Importe qualquer especificação OpenAPI ou Swagger e deixe o sgcOpenAPI gerar interfaces Object Pascal limpas e idiomáticas, prontas para o seu projeto.
Comece instantaneamente com SDKs Pascal prontos para usar nos maiores provedores de nuvem. Todos os SDKs são atualizados regularmente para acompanhar as especificações mais recentes das APIs.
Três passos simples para sair de uma especificação de API até o código Pascal totalmente integrado.
Carregue seu arquivo de especificação OpenAPI 3.x no formato JSON ou YAML. As especificações Swagger 1.x e 2.x são detectadas automaticamente e convertidas para o esquema OpenAPI 3.x.
O analisador examina endpoints, parâmetros, modelos de requisição/resposta e esquemas de autenticação e, em seguida, gera código Pascal limpo e idiomático com mapeamento de tipos adequado.
Solte as units geradas no seu projeto Delphi. Segurança total de tipos, suporte a IntelliSense e zero dependências externas. Comece a chamar APIs imediatamente.
Funciona com todas as principais versões das toolchains Delphi e Pascal.
Suporte total do Delphi 7 ao RAD Studio 13. Frameworks VCL e FireMonkey com registro de componentes em tempo de design.
Suporte nativo ao C++ Builder com headers de wrapper. Compatível com C++ Builder 2007 até C++ Builder 13.
Veja como fica um SDK Pascal gerado na prática — limpo, com tipos seguros e pronto para usar.
uses sgcOpenAPI_PetStore; // Generated from petstore.yaml procedure TForm1.btnGetPetClick(Sender: TObject); var Client: TsgcOpenAPI_PetStoreClient; Pet: TsgcOpenAPI_Pet; begin Client := TsgcOpenAPI_PetStoreClient.Create(nil); try Client.BaseURL := 'https://petstore.swagger.io/v2'; Client.ApiKey := 'your-api-key'; // Type-safe API call with IntelliSense Pet := Client.GetPetById(42); try Memo1.Lines.Add('Name: ' + Pet.Name); Memo1.Lines.Add('Status: ' + Pet.Status); Memo1.Lines.Add('Category: ' + Pet.Category.Name); finally Pet.Free; end; finally Client.Free; end; end; procedure TForm1.btnListPetsClick(Sender: TObject); var Client: TsgcOpenAPI_PetStoreClient; Pets: TsgcOpenAPI_PetList; i: Integer; begin Client := TsgcOpenAPI_PetStoreClient.Create(nil); try Client.BaseURL := 'https://petstore.swagger.io/v2'; // Strongly-typed list of Pet objects Pets := Client.FindPetsByStatus('available'); try for i := 0 to Pets.Count - 1 do ListBox1.Items.Add(Pets[i].Name); finally Pets.Free; end; finally Client.Free; end; end;