lo que debes tener en cuenta que una instancia de una clase en delphi es un puntero y que una DLL se abre en el espacio de direcciones del programa que las llama así que podrias castear tu adoQuery como un longint:
Código Delphi
[-]
function obtenerConsulta: longint; stdcall;
begin
result := longint(myAdoQuery);
end;
y en tu otra dll llamarla de igual manera:
Código Delphi
[-]
var
myQuery: TAdoQuery;
begin
myQuery := TADOQuery( obtenerConsulta );
end;