chamar ajuda (F1) de qualquer ponto do formulário

Delphi

16/09/2008

Bom dia a todos,

Preciso chamar uma tela teclando F1 ou outra tecla em qualquer parte do formulario ( posso estar em um buttom ou edit ).

no evento ONKEYUP nao funcionou.

Agradeço desde já.

Silvio Coelho


Minervasoft

Minervasoft

Curtidas 0

Respostas

Edilcimar

Edilcimar

16/09/2008

Coloque no Activate do form principal
Application.HelpFile := ´nomedoarquivodeajuda´;
em cada um dos forms coloque
FormX.HelpContext := Y, onde X é o número do form e Y é o número do contexto do arquivo de ajuda


GOSTEI 0
Paullsoftware

Paullsoftware

16/09/2008

Estranho não ter funcionado...

a propriedade [b:c78eefe040]KeyPreview[/b:c78eefe040] do form ta setada para TRUE? então era pra funcionar...

testei aqui e funcionou normalmente

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if Key = VK_F1  then
 ShowMessage(´F1...´);
end;

espero ter ajudado :wink:


GOSTEI 0
POSTAR