sexta-feira, 17 de abril de 2009

Simular a Tecla TAB em uma aplicação Delphi

Visitando o fórum do www.clubedelphi.net, encontrei um tópico que achei interessante, que era simular o pressionamento da tecla TAB. Para fazer isso, é só colocar o codigo abaixo

keybd_event(VK_TAB, 0, 0, 0);
keybd_event(VK_TAB, 0, KEYEVENTF_KEYUP, 0);

Funciona que nem boca de bode.

quarta-feira, 1 de abril de 2009

Obter Numero de Paginas de um Relatorio Fast Report 2.54

As vezes um pequeno detalhe consome um dia de programação.

Estava precisando recuperar o numero de paginas de um relatorio atraves do fast report.
Após varias horas do metodo MLTE, consegui recuperar essa informação atraves do seguinte comando:

frRelCad.GetVariableValue('PAGINA',v);

onde frRelCad é o componente FastReport 2.54,
PAGINA é a minha variavel dentro do relatorio e
v é uma variável tipo Variant que retorna o valor
da variável.