si, gracias [AzidRain] y ecfisa mejor hice el query como me lo recomendaron, asi quedo:
Código Delphi
[-]
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(' SELECT e.nid_evento, e.sclave, e.snombre_evento, te.stipo_eventos, e.slugar, e.dfecha_inicio, cl.srazon_social, c.snombre_contacto');
Query1.SQL.Add(' FROM eventos e INNER JOIN clientes cl ON e.nid_cliente = cl.nid_cliente LEFT JOIN tipo_eventos te ON e.nid_tipo_evento = te.nid_tipo_evento');
Query1.SQL.Add(' LEFT JOIN clientes_contactos cc ON cl.nid_cliente = cc.nid_cliente LEFT JOIN contactos c ON c.nid_contacto = cc.nid_contacto ');
Query1.SQL.Add(' LEFT JOIN medios_contacto mco ON c.nid_contacto = mco.nid_contacto LEFT JOIN medios_comunicacion mec ON mec.nid_medio_comunicacion = mco.nid_medio_comunicacion');
Query1.SQL.Add(' WHERE e.nstatus = 3 OR e.nstatus = 1 and SNOMBRE_EVENTO like' +#39+'%'+Trim(EditBusca.Text)+'%'+#39);
GRacias por su ayuda. Saludoss