Para listar los campos a los que una llave foranea les hace referencia, sabiendo el nombre de la llave:
Código SQL
[-]
SELECT S.RDB$FIELD_NAME FROM RDB$INDICES I
INNER JOIN RDB$INDEX_SEGMENTS S ON(S.RDB$INDEX_NAME = I.RDB$FOREIGN_KEY AND
I.RDB$INDEX_NAME= :Nombre_Llave)
Para mas informacion visitar http://www.clubdelphi.com/foros/showthread.php?t=47015