Problema con instruccion SQL! Ayuda plz!!

[cslbcn]

Buenas a todos.

Dentro de un ADOQuery ADOQPersona tengo que poner una intruccion SQL asi:

Código SQL [-]
SELECT Tabla1.ID, Tabla1.NOM, Tabla2.ID FROM Tabla1, Tabla2 WHERE Tabla1.ID = Tabla2.ID

Pero en lugar de escribir Tabla2.ID, he de poner esto:
DM1.ADOQEmpresa.FieldByName('ID').AsString

Por lo que la instruccion SQL queda así:

Código SQL [-]
SELECT * FROM Tabla1 WHERE ID = DM1.ADOQEmpresa.FieldByName('ID').AsString

ADOQEmpresa y ADOQPersona pertenecen a Data Module diferentes.

Hasta aquí la teoría es correcta. Pero cuando quiero rellenar el ADOQPersona usando "Add All Fields", me sale un error diciendo que "DM1" "ADOQEmpresa" "FieldByName('ID')" no es un identificador válido...

Alguien sabe qué ocurre? Estoy escribiendo mal la SQL??

Gracias a todos!