Re: [delphi-br] Forçar letras maiúsculas no dbmemo

Eu não conhecia a função AnsiUpperCase. Então por que existe a função UpperCase? A função AnsiUpperCase é mais nova e UpperCase ficou por motivo de compatibilidade entre versões do Delphi? Tem alguma maneira de saber se existe uma função mais atualizada que outra que usamos? [As partes

[delphi-br] Forçar letras maiúsculas no dbmemo

Como faço para forçar letras maiúsculas no dbmemo? att, Rodrigo Brito

Re: [delphi-br] Forçar letras maiúsculas no dbmemo

Herda o componente e publica a propriedade CharCase :) Henrique - Original Message - From: Rodrigo Brito To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 19, 2006 11:12 AM Subject: [delphi-br] Forçar letras maiúsculas no dbmemo Como faço para forçar letras

Re: [delphi-br] Forçar letras maiúsculas no dbmemo

Eu uso no evento onKeyPress do memo, o código: Key := AnsiUpperCase(Key)[1]; valeu. - Original Message - From: Rodrigo Brito [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 19, 2006 10:12 AM Subject: [delphi-br] Forçar letras maiúsculas no dbmemo Como faço

Re: [delphi-br] Forçar letras maiúsculas no dbmemo

Implemente a seguinte função: function UpperCaseEspecial(Texto: string): string; begin Texto := UpperCase(Texto); Texto := StringReplace(Texto, 'á', 'Á', [rfReplaceAll]); Texto := StringReplace(Texto, 'á', 'À', [rfReplaceAll]); Texto := StringReplace(Texto, 'ã', 'Ã', [rfReplaceAll]);