Pegar valor de keydown

Delphi

09/09/2005

Deixa eu explicar:

quero que no evento do onkeydown do dbgrid, aconteça o seguinte

verifica se a tecla apertada é diferente de [b:88270a7c27]enter, esquerda, direita, cima, baixo[/b:88270a7c27] até aí tudo, se for diferente devrá colocar o focu em um edit e colocar o valor correspondete a tecla apertada.

if not (key in [vk_return, vk_left, vk_right, vk_down, vk_up]) then
begin
txtprocura.SetFocus;
txtprocura.Text:= key; <- aqui está o problema
end;


ou seja se o usuário por exemplo aperta a letra ´a´, deverá ir o focu para o txtprocura e o texto deve ser a letra ´a´.


Sistemald

Sistemald

Curtidas 0

Respostas

Rjun

Rjun

09/09/2005

txtProcura.Text = Chr(Key);



GOSTEI 0
Sistemald

Sistemald

09/09/2005

perfeito só inclui mais uma linha para colocar o cursos depois da letra.

if not (key in [vk_return, vk_left, vk_right, vk_down, vk_up]) then
begin
txtprocura.SetFocus;
txtprocura.Text:= Chr(Key);
txtprocura.SelStart:= 1;
end;



até mais


GOSTEI 0
POSTAR