Daniel Simoes, já tentei também, mas dá erro de conversão, usei também o UTF8UpperString e também retorna os caracteres minúsculos bylaardt infelizmente o TForm não tem o evento OnUTF8KeyPress e nem a propriedade CharCase, não quero me limitar apenas ao componente TEdit. Enfim vou procurar uma forma, obrigado!
Olá pessoal,
No Lazarus, no evento OnKeyPress de um form coloquei o seguinte comando:
Key := AnsiUpperCase(Key)[1];
Porém quando uso acento ou "ç" a letra não retorna maiúscula como acontece no delphi:
Alguém já passou por isso? Help!
Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.