Fórum AJUDA IMPRESSÃO APOS INCLUSÃO COM SQL. #202521

Galera meu problema deve ser fácil pra quem sabe!, faço a seguinte inclusão com este código sql abaixo e tudo funciona legal, o que eu quero que quando ele terminar de incluir, ou seja depois que eu apertar o botão incluir ele me peça o seguinte, DESEJA IMPRIMIR ESTE CUPOM, dai ele imprima o cupom que acabei de incluir.

Agradeço a ajuda de vcs, sem vcs este forum não seria nada.


ADOQueryCupom.close;
ADOQueryCupom.SQL.Clear;
ADOQueryCupom.SQL.Add(´Insert into TabValeCompras(matricula,nome,codigovale,nomedovale,valor)values(:matricula,:nome,:codigovale,:nomedovale,:valor)´);
ADOQueryCupom.Parameters.ParamByName(´matricula´).value := DBE1Cupom.Text;
ADOQueryCupom.Parameters.ParamByName(´nome´).value := DBE2Cupom.Text;
ADOQueryCupom.Parameters.ParamByName(´codigovale´).value := DBEdit1CupomVale.Text;
ADOQueryCupom.Parameters.ParamByName(´nomedovale´).value := DBEdit1CupomValeDesc.Text;
ADOQueryCupom.Parameters.ParamByName(´valor´).value := Edit3CupomValor.Text;
ADOQueryCupom.ExecSQL;