Nº das teclas do teclado
Código
//Mudar a propriedade KeyPreview para true
//No OnKeyDown do form digite:
procedure TPrograma.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
ShowMessage('O Nº da tecla [' + Char(Key)+ '] é: =>'+ '#'+ IntTostr(Key));
end;
Publicidade
Vote na dica
Quantidade de votos: 1 voto
Aceitação: 20%
Detalhes da dica
Categoria: Forms
Adicionada dia: 08/07/09
Por: Rodrigo
Visualizada: 4361 vezes
Adicionada dia: 08/07/09
Por: Rodrigo
Visualizada: 4361 vezes
COLUNISTAS
Publicidade
Enquete
O que achou do novo site?
Validações
Publicidade
Enquete
O que achou do novo site?
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009