Substituir ponto por virgula

27/02/2006

0

prociso que no momento que que o usuário esteja digitando, ao pressionar a tecla ponto, automaticamente e instantaneamente, o ponto seja substituído por uma vírgula.


Raserafim

Raserafim

Responder

Posts

27/02/2006

Rjun

Coloque o seguinte código no evento OnKeyPress do seu edit.

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if (Key = ´,´) then Key := ´.´;
end;



Responder

18/03/2006

Raserafim

é isso mesmo Rjun.

valeu


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar