[[egostar]]

Agrega esto después del open.

Código Delphi [-]
if IBQuery1.RecordCount > 0 then begin
  ShowMessage('Encontro registros');
end
else begin
  ShowMessage('NO Encontro registros');
end;

Salud OS