Fórum Substituir ponto por virgula #314461
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
Curtir tópico
+ 0
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
Gostei + 0
18/03/2006
Raserafim
é isso mesmo Rjun.
valeu
valeu
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)