Delphi + SQL Server: Como resolver o problema de campos XML via ADO

Ao integrar Delphi com SQL Server utilizando ADO, um problema bastante comum pode surgir: campos do tipo XML não são mapeados corretamente, aparecendo como ftUnknown ou inacessíveis no TADOQuery. Isso acontece mesmo que o campo esteja presente na consulta SQL.

Mas fique tranquilo: existem duas soluções eficazes para resolver esse problema, e você pode escolher a que melhor se adapta ao seu cenário.

🧩 Por que isso acontece?

O tipo XML foi introduzido no SQL Server 2005 e não é tratado adequadamente por padrão através do provedor ADO, mesmo com o SQL Native Client (SQLNCLI). O Delphi, utilizando ADO, espera tipos compatíveis com versões anteriores, como varchar, nvarchar, etc.

Segundo documentação oficial da Microsoft, os novos tipos como XML e UDT só são corretamente expostos ao ADO se o parâmetro DataTypeCompatibility estiver corretamente configurado na connection string.

✅ Solução 1: Converter o campo XML diretamente na consulta

A maneira mais direta de contornar o problema é converter o campo XML para texto no próprio SQL, usando CONVERT ou CAST. Isso garante compatibilidade imediata com os componentes ADO no Delphi.

SELECT 
  Id,
  Nome,
  CONVERT(varchar(MAX), DadosXml) AS DadosXml
FROM Clientes

No Delphi, o campo DadosXml será tratado como ftMemo, o que permite seu uso normal com FieldByName('DadosXml').AsString.

Essa solução é especialmente útil se você não puder alterar a connection string (como em projetos legados ou restrições de TI).

✅ Solução 2: Usar DataTypeCompatibility=80 na connection string

Para quem deseja uma solução mais técnica e robusta, é possível ajustar a connection string do ADO para que o provedor SQL Native Client expose os tipos XML e UDT de forma compatível com o ADO.

Como fazer:

Use o provedor SQL Native Client 11 (SQLNCLI11) e adicione a propriedade DataTypeCompatibility=80:

Provider=SQLNCLI11;
Data Source=SERVIDOR\INSTANCIA;
Initial Catalog=SeuBanco;
User ID=usuario;
Password=senha;
DataTypeCompatibility=80;

🔍 A propriedade DataTypeCompatibility=80 instrui o provedor a expor os tipos de dados como se fosse o SQL Server 2000, o que permite que o ADO interprete corretamente os tipos XML e UDT.

Com isso, você não precisa alterar suas queries, e os campos XML devem aparecer corretamente mapeados no Delphi.

🧪 Qual solução escolher?

✍️ Exemplo em Delphi

ADOConnection1.ConnectionString :=
  'Provider=SQLNCLI11;' +
  'Data Source=SERVIDOR\SQL2019;' +
  'Initial Catalog=MeuBanco;' +
  'User ID=usuario;Password=senha;' +
  'DataTypeCompatibility=80;';

ADOQuery1.SQL.Text := 'SELECT Id, Nome, DadosXml FROM Clientes';
ADOQuery1.Open;
ShowMessage(ADOQuery1.FieldByName('DadosXml').AsString);

🔚 Conclusão

Se você utiliza Delphi com ADO e precisa acessar campos do tipo XML no SQL Server, agora tem duas formas confiáveis de resolver o problema:

• Converter o campo XML para texto (varchar(max)) na SQL;

• Ou configurar a connection string com DataTypeCompatibility=80 e usar o SQLNCLI11.

Ambas são soluções testadas e eficazes. Escolha a que melhor se encaixa no seu projeto!

🚀 Gostou da dica?

Deixe seu comentário abaixo com sua experiência ou dúvida!
🔁 Compartilhe este post com outros desenvolvedores que usam Delphi + SQL Server, pode ajudar muita gente!

💬 Vamos trocar ideias!

#Delphi #SQLServer #ADO #XML

#DevTips #Programação #Desenvolvimento

#GiovaniDaCruz