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

 


Responder a