Um If que busque um select no banco de dados e me mostre uma mensagem se foi encontrado algo diferente do que eu busquei !

inicio da função
Function Pesquisa_Registro_Especifico(Script_SQL:String):boolean;
begin
Sua_Query.close;
Sua_Query.SQL.CLEAR;
Sua_Query.SQL.TEXT:=Script_SQL;
Sua_Query.fetchall;

if Sua_Query.recordcount=1 then
begin
result:=true;// encontrou o registro
end
else
begin
result:=false;//não encontrou o registro
end;
// Fim da Função

Para chamar a função

If Pesquisa_Registro_Especifico('SELECT * FROM MATMAT WHERE ATIVO = "A"')=true then
begin
showmessage('Registro encontrado');
end;

Optei pela função pois você poderá usar essa rotina para realizar varias consulta chamando apenas a função e passando o sql.
>> Pesquisa_Registro_Especifico('SELECT * FROM MATMAT WHERE ATIVO = "A"') //Se ele retornar True é porque encontrou 1 Registro.