eliminacion de tablas relacionada

[lucasarts_18]

Empezado por alfil123

la segunda alternativa, tendria que hacer un conteo del numero de registros que se relaciones con el registro que pretendo eliminar, y si es el conteo es mayor a cero emvio el mensaje, en caso contrario elimino, ¿como hago el conteo de estamanera ?

Así se hace:

Código Delphi [-]
if Qry.Count > 0 then
begin
   //lo que quieres hacer
   ....
end;