Olá estimado, No keypress do form não daria certo ?
procedure Tform1.FormKeyPress(Sender: TObject; var Key: Char); begin case UpCase(Key) of '+' : soma; '-' : menos; '*' : multiplica; '/' : divide; '%' : porcentagem; '=' : igual; '0'..'9' : numeros; #8 : backspace; end; end; --- []'s Alexandre -----Mensagem original----- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Hudson Enviada em: segunda-feira, 11 de julho de 2005 08:14 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Key urgente Alguem sabem qual é a key do botão "%" ?????????????? _____ avast! Antivirus <http://www.avast.com> : Mensagem Enviada está livre de virus. Banco de dados de vírus (VPS): 0527-2, 08/07/2005 Testado em: 11/7/2005 08:57:20 avast! is copyright (c) 2000-2004 ALWIL Software. -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html