API do VerCNPJ

GET https://api.vercnpj.com.br/v1/cnpj/12ABC345000188?incluir=socios,simples
X-Api-Key: SUA_CHAVE

uses System.SysUtils, System.Net.HttpClient, System.JSON;

// Lê um campo pelo caminho ("data.endereco.cep"); null ou ausente = ''.
function Campo(AJson: TJSONValue; const ACaminho: string): string;
var V: TJSONValue;
begin
  V := AJson.FindValue(ACaminho);
  if (V = nil) or (V is TJSONNull) then Result := '' else Result := V.Value;
end;

function ConsultarCNPJ(const ACNPJ, AChave: string): TJSONValue;
var
  Http: THTTPClient;
  Resp: IHTTPResponse;
begin
  Http := THTTPClient.Create;
  try
    Http.CustomHeaders['X-Api-Key'] := AChave;
    Resp := Http.Get('https://api.vercnpj.com.br/v1/cnpj/' + ACNPJ + '?incluir=socios,simples');
    Result := TJSONObject.ParseJSONValue(Resp.ContentAsString(TEncoding.UTF8));
    if Campo(Result, 'success') <> 'true' then
    try
      raise Exception.CreateFmt('%s: %s', [Campo(Result, 'error.code'), Campo(Result, 'error.message')]);
    finally
      Result.Free;
    end;
  finally
    Http.Free;
  end;
end;

// Uso:
var Dados: TJSONValue;
begin
  Dados := ConsultarCNPJ('12ABC345000188', 'vc_test_SUA_CHAVE_DE_TESTE');
  try
    EdtRazao.Text    := Campo(Dados, 'data.razao_social');
    EdtFantasia.Text := Campo(Dados, 'data.nome_fantasia');
    EdtCEP.Text      := Campo(Dados, 'data.endereco.cep');
    EdtIBGE.Text     := Campo(Dados, 'data.endereco.municipio.codigo_ibge');
    EdtSituacao.Text := Campo(Dados, 'data.situacao.descricao');
  finally
    Dados.Free;
  end;
end;

curl "https://api.vercnpj.com.br/v1/cnpj/12ABC345000188?incluir=socios" -H "X-Api-Key: SUA_CHAVE"

import requests
r = requests.get('https://api.vercnpj.com.br/v1/cnpj/12ABC345000188', params={'incluir': 'socios,simples'},
                 headers={'X-Api-Key': 'SUA_CHAVE'}, timeout=15)
j = r.json()
if not j['success']:
    raise RuntimeError(j['error']['code'])
print(j['data']['razao_social'], j['data']['endereco']['cep'])

using var http = new HttpClient();
http.DefaultRequestHeaders.Add("X-Api-Key", "SUA_CHAVE");
var json = await http.GetStringAsync("https://api.vercnpj.com.br/v1/cnpj/12ABC345000188");
using var doc = System.Text.Json.JsonDocument.Parse(json);
var razao = doc.RootElement.GetProperty("data").GetProperty("razao_social").GetString();

$ch = curl_init('https://api.vercnpj.com.br/v1/cnpj/12ABC345000188');
curl_setopt_array($ch, [CURLOPT_RETURNTRANSFER => true, CURLOPT_HTTPHEADER => ['X-Api-Key: SUA_CHAVE']]);
$j = json_decode(curl_exec($ch), true);
echo $j['success'] ? $j['data']['razao_social'] : $j['error']['code'];

const r = await fetch('https://api.vercnpj.com.br/v1/cnpj/12ABC345000188', { headers: { 'X-Api-Key': 'SUA_CHAVE' } });
const j = await r.json();
console.log(j.success ? j.data.razao_social : j.error.code);