Ja tentou assim?
Procedure TForm1.gridkeyPress(Sender: TObject;
Var Key: Char);
Begin
if grid.col<>(indice da coluna) then
Key := AnsiUppercase(key)[1];
End;
[EMAIL PROTECTED]
-------Mensagem original-------
De: Eduardo Silva ®
Data: 07/04/06 16:17:09
Para: Grupo Delphi-br
Assunto: [delphi-br] Maiuscula/Minuscula
Pessoal, para digitar somente maiuscula no grid eu faço o seguinte:
procedure TForm1.gridkeyPress(Sender: TObject;
var Key: Char);
begin
key := AnsiUppercase(key)[1];
end;
O problema é que todos os campos do grid ficam maiuscula. Neste grid eu
tenho o cmapo do e-mail, e precisava que o mesmo ficasse minusuclo, somente
ele, alguem pode me dar uma mão?
Obrigado.
Outra duvida, neste mesmo grid, eu tenho um campo sexo, como colocar as
opções "M" e "F" para o usuário escolher dentro da célula respectiva?
__ __
/ \ /| |'-.
.\__/ || | |
_ / `._ \|_|_.-'
| / \__.`=._) (_
|/ ._/ |"""""""""|
|'. `\ | | Eduardo de Almeida Silva
;"""/ / | | Kobra Sistemas
) /_/| |.-------.| Desenvolvimento de Software
' `-` ' " "
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< 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]
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
