Delphi - Problema con el evento OnMuoseDown en un TImage

select where not exists anidado con select a varias tablas