As teclas F1,F2 ... F12 as vezes não funcionam

Delphi

06/05/2006

Alguém poderia me explicar o porquê: as vezes as Teclas F1,F2 ... F12
as vezes não funcionam, mesmo colocando Key Preview do Form como
True?
As vezes tenho que apertar ESC para que elas voltem a agir.
Uso D6 com Firebird 1.5.
Se for ajudado agradeço.


Rinez

Rinez

Curtidas 0

Respostas

Sremulador

Sremulador

06/05/2006

verifique se o f10 não foi pressionado, pois ele ativa o menu de sistema...


GOSTEI 0
Rinez

Rinez

06/05/2006

É isso mesmo.
Após pressionar F10 é necessário dar um ESC para que
as teclas voltem a funcionar.
O que fazer para desativar o menu do sistema?


GOSTEI 0
Marco Salles

Marco Salles

06/05/2006

O que fazer para desativar o menu do sistema?

Varias maneiras

Uma delas..

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=Vk_F10 then
  begin
    showmessage(´fazer o que tem que fazer´);
    Key:=0; //-->> apos interceptar ignorar
  end;
end;



GOSTEI 0
POSTAR