Total de registros no título do form

Em qual evento executando essa procedure.
O correto é executar essa procedure no onShow pois quando ele for abrir o form ele já executa e traz as informações.

sempre que eu executo uma consulta ou um filtro

Bom dia Vagner,

você já tentou o "application.ProcessMessages" ?

Não. Poderia me dar um exemplo de como utilizar?

Fiz o teste, mas não funcionou :(

Será que não funciona colocando essa informação no título do form?

Acho que vou ter que colocar outro componente como por exemplo TEdit ou TLabel.

tenteou executar como disse.
Disparar a ação quando abrir ou criar um form?
pois fis uns testes aqui e funcionou quando criei.

O meu form de consulta só apresenta registros quando é realizado uma consulta ou filtro (o filtro dispara uma consulta automaticamente) então não faz sentido eu colocar uma informação no onshow, oncriate ou onactive do form porque irá me trazer "Consultar Produtos .:. Total Registros: 0".

O problema é que após feito uma consulta eu executo a procedure "TotalRegistros;" para ser mostrado no caption do form, mas só aparece quando eu utilizo o alt+tab. Ou seja, é preciso retirar o foco do form para depois focá-lo/ativa-lo novamente para apresentar a mensagem.

entendi, na verdade o seu for não recebeu a atualização, quando você sai de um campo ai ele atualiza.
Já tentou depois de feito ação dar um refresh no formulário. Procure por algo desse gênero,

Já tentei dando um Update, Application.ProcessMessages e nada.
Vou colocar essa informação em outro local mesmo.

Obrigado à todos pela atenção.

colega só fazer isto que funciona...


begin

if pnlFormula.Visible then
Frm_CstProduto.Caption := 'Consultar Produtos .:. Total Registros: ' + IntToStr(dm.qryProF7.RecordCount)
else
Frm_CstProduto.Caption := 'Consultar Produtos .:. Total Registros: ' + IntToStr(dm.qryProduto.RecordCount);

Application.ProcessMessages;

end;