Toon posts:

[delphi 6] Virtual Keys, tab werkt niet

Pagina: 1
Acties:

Verwijderd

Topicstarter
Ik wil dus de VK_ keys gebruiken in delphi , dit werkt goed bij

VK_return
VK_up

enz enz alleen de VK_TAB werkt niet bij mij, als ik op tab drukt dan ziet hij dit niet als VK_TAB terwijl dit volgens de delphi help wel zo moet zijn....

ik heb delphi 6 ent. met service packs.

kan ik dit ook anders oplossen ???

  • LordLarry
  • Registratie: Juli 2001
  • Niet online

LordLarry

Aut disce aut discede

Tab en andere toetsen die een speciale betekenis hebben voor het window worden al eerder afgevangen.

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
In je Form delaratie:

private
    Procedure CMDialogKey(Var Msg: TWMKey); message CM_DIALOGKEY;

In je implementatie:

procedure TForm1.CMDialogKey(Var Msg: TWMKey);
Begin
  if Msg.Charcode = VK_TAB Then Begin
    //doe iets 
   // zet msg.result := 1; en Exit; als je niet wilt dat de key verder afgehandeld wordt.
  end;
  inherited;
end;

We adore chaos because we like to restore order - M.C. Escher