Erro em Sys.CurrentQuery.FieldByName[''].IsNull na conversão de Delphi7 para DelphiXE3

Question

Ao realizar a conversão me deparei com o problema abaixo:

if not Sys.CurrentQuery.FieldByName['TABELAFILME'].IsNull

É apresentado o erro: Undeclared identifier 'IsNull' at line 287.

Qual a melhor forma de resolver?

 

Comments

Acredito que trocar para ( irá gerar erro na hora de executar.
Para responder é necessário conhecer o tipo Sys. É um IBSistema, ou um OleVariant?

---

Estou compilando este código. Você pode mandar umas linhas a mais acima e abaixo do erro?

Answer 1

O tipo Sys é OleVariant.

O erro apresentado não foi de compilação, mas, de intelisente (sublinhando em vermelho).

O delphi infelizmente não é tão eficiente quanto o visual studio para mostrar estes erros, logo alguns deles simplesmente não fazem sentido, pois o código é compilado e gera a dll, exe.

 

 

 

Answer 2

Estou supondo que a classe do seu código é uma herança de TField do Delphi.

Isto não teve alteração em XE3. A propriedade IsNull está presente, e funcinado. Não tivemos problema na conversão para XE3 no Runner. 

Segue documentação:
http://docwiki.embarcadero.com/Libraries/XE3/en/Data.DB.TField.IsNull
http://docwiki.embarcadero.com/Libraries/XE3/en/Data.DB.TField_Properties