FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Escribir mayuscula minuscula
Hola!
Como puedo hacer para escribir en un DBEdit o TEdit, ejemplo; "Club Delphi Es Lo Mejor" Sin importar que el BloqMayùs este activado o desactivado? Gracias |
#2
|
||||
|
||||
Hola sisne.
El TDBEdit hereda de TCustomEdit la propiedad CharCase de tipo TEditCharCase, esta puede tomar los siguientes valores:ecNormal, ecUpperCase, ecLowerCase. ecNormal: Se respeta el texto tal como se ingresa. ecUpperCase: Todo el texto es pasado a mayúsculas. ecLowerCase: Todo el texto es pasado a minúsculas. Podés elegir dicha propiedad desde el Object Inspector, espero que sea eso lo que preguntas. Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#3
|
||||
|
||||
Perdón sisne, me confundí al interpretar tu mensaje (no sé donde tengo la cabeza...)
Para que lo que escriban quede tál como lo ingresan, Bloq Mayus tiene que estar desactivada. Para detectar si esta o no desactivada y cambiar el estado podes usar este codigo: Código:
procedure TForm1.FormCreate(Sender: TObject); var KeybEstat: TKeyboardState; begin GetKeyboardState(KeybEstat); // Tomar estado teclado if KeybEstat[VK_CAPITAL] = 1 then // Bloq Mayus presionado (0= no) CambiarCapital; // Cambiar end; { Cambia estado Bloq Mayus } procedure CambiarCapital; begin //Presionar Bloq Mayús keybd_event(VK_CAPITAL,0,KEYEVENTF_EXTENDEDKEY,0); //Soltar Bloq Mayús keybd_event(VK_CAPITAL,0,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP,0); end; Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 19-04-2010 a las 18:45:39. |
#4
|
||||
|
||||
Y que tal si se pone el siguiente código en el evento OnKeyPress del Edit en cuestión.
. Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7
|
#5
|
|||
|
|||
Hola...
Espero que no sea demasiado tarde en responder pero yo alguna vez trabaje con algo parecido.... Mira una manera de hacerlo es con el evento onkeypress del componente... No te paso el codigo....mejor te doy la idea... Bueno lo que puedes hacer es almacenar en una variable global de tipo char la tecla presionada es decir la que pasa como parametro tal evento (Key: char)... Para que siempre puedas tener la letra anteriormente escrita... Por ejemplo si (if) hay un ' ' (espacio) anterior pues aplicas que la key ya presionada(letra) se convierta a mayuscula automaticamente: Key := AnsiUpperCase(Key)[1]; Ha y tambien tienes que evaluar en el if si es la primera letra pulsada, lo puedes hacer si la variable global char=''(que indica que no ha almacenado nada).... Y ademas creo que es necesario evaluar el salto de linea tambien...es decir si la variable global char=#13..... Estas tres condiciones las evaluas en un if con un or y ya está..... PD: La variable global que almacena el key debe ser la última instrucción dentro del evento keypress..... |
#6
|
|||
|
|||
Bueno...
Parece que ya me ganaron...... Muy buen codigo... |
#7
|
||||
|
||||
Hola a todos.
Todas las propuestas están acertadas, pero veo que hemos tomado diferentes criterios sobre lo que pide sisne. Cita:
Pero si BloqMayus esta activa no obtendrá ese resultado... Yo por mi parte hice incapié en el tercer renglón, pensando que quería poder escribir mayúsculas y minúsculas independientemente de que hubieran presionado BloqMayús. Pero no obtendrá la primer letra de la palabra en mayúsculas... Creo que combinando los códigos, sisne podrá cubrir sus espectativas. Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 20-04-2010 a las 02:54:47. |
#8
|
|||
|
|||
Hoola!
ecfisa exacto sin importar si esta o no el Bloq Mayús activado, la cuestión es que en el Tedit me permita escribir cada comienzo de una nueva letra o palabra después del espacio en mayúscula. Muchas Gracias A Todos Eh!! Saludos. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Primeras letras en mayúscula | pablo | Varios | 11 | 13-08-2015 17:46:01 |
convertir de minuscula a mayuscula | airam | C++ Builder | 8 | 20-08-2008 00:26:55 |
Mayuscula y Minuscula | lucasarts_18 | Firebird e Interbase | 3 | 17-10-2005 00:54:13 |
Siempre escribir en mayuscula en un grid | el_barto | Varios | 11 | 16-06-2005 19:05:34 |
|