saber si existe una columna de una tabla de firebird

[identsoft]

Perdon, no se porque aparece dos veces.
Me contesto yo mismo:

Código Delphi [-]
SELECT * FROM RDB$RELATION_FIELDS' +
                               ' WHERE RDB$RELATION_NAME = ' + QuotedStr('LIN_FACT') +
                               ' AND  RDB$FIELD_NAME = ' + QuotedStr('CLV_CONCE');