Alguém poderia me ajudar, FormMdi
No evento OnKeyPress do form tenho este código:
if Key = VK_F1 then
begin
ShowMessage(´Teste´);
end;
Só que quando mudo a propriedade FormStyle para fsMDIForm, não funciona, com os outros tipos da Propriedade funciona normalmente, deve haver alguma particularidade que não consegui encontrar.
Gostaria de saber o que pode esta acosionando isto, desde já obrigado.
if Key = VK_F1 then
begin
ShowMessage(´Teste´);
end;
Só que quando mudo a propriedade FormStyle para fsMDIForm, não funciona, com os outros tipos da Propriedade funciona normalmente, deve haver alguma particularidade que não consegui encontrar.
Gostaria de saber o que pode esta acosionando isto, desde já obrigado.
Fabio Colli
Curtidas 0
Respostas
Leoback
02/06/2003
Irmão!
Na minha opnião você deveria usar o método OnKeyDown ao invés do OnKeyPress do objeto TForm porque alguma teclas não tem correspondente código ASCII (é o caso do F1 por exemplo) e por isso não é gerado o evento OnKeyPress para elas (fonte: Help Delphi7). Eu usei seu código em um form MDIChild com o evento OnKeyDown e rodou normalmente.
Espero ter ajudado!
Leo
Na minha opnião você deveria usar o método OnKeyDown ao invés do OnKeyPress do objeto TForm porque alguma teclas não tem correspondente código ASCII (é o caso do F1 por exemplo) e por isso não é gerado o evento OnKeyPress para elas (fonte: Help Delphi7). Eu usei seu código em um form MDIChild com o evento OnKeyDown e rodou normalmente.
Espero ter ajudado!
Leo
GOSTEI 0