Uso das teclas de função

Delphi

08/03/2005

Pessoal

Como poderia fazer para que quando estiver focado em um componente, eu pressiono a tecla F5 por exemplo, ele dispara o evento, até ai tudo bem. Mas quando estiver focado em um outro componente eu pressiono a tecla F5 ele dispara outro evento.

Ex: Vamos dizer que a tecla F5 seja padrão do meu sistema para consultas, então se o foco está no campo Código Cliente, pressiono F5 chama o formulário de consulta de clientes, mas se o foco estiver no campo Código Funcionário, pressiono F5 e chama a tela de consulta de funcionários.... Como poderia fazer ???

Rogério


Rogeranalista

Rogeranalista

Curtidas 0

Respostas

Lucianopimenta

Lucianopimenta

08/03/2005

Vc deve verificar a função Focused do componente (pelo menos fiz o teste em Edits e funcionou):

if Key = VK_F5 then
if Edit1.Focused then
ShowMessage(´Ta no Edit1´)
else if Edit2.Focused then
ShowMessage(´Ta no Edit2´)
else
ShowMessage(´Ta no Edit3´);

Evento OnKeyDown do form.


GOSTEI 0
POSTAR