FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Perdon ya encontre una Pc con delphi
y pude constatarlo procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char); begin key:=upcase(key); end; creo que la ñ no la pone en mayuscula. tu lo checas Suerte!!!
__________________
Toda Teoria es Gris mas es verde en Arbol de Dorados Frutos que es la Vida (Goethe) |
#2
|
|||
|
|||
bueno con un for podria ser asi
procedure TForm1.Button1Click(Sender: TObject); var x:byte; cad:string; begin cad:=Edit1.Text; Edit1.Clear; for x:=0 to length(cad) do begin Edit1.Text:=Edit1.Text+uppercase(cad[x]); end; end; o tambien Edit1.Text:=uppercase(Edit1.Text);
__________________
Toda Teoria es Gris mas es verde en Arbol de Dorados Frutos que es la Vida (Goethe) |
#3
|
||||
|
||||
Gracias amigos utilice el:
Cita:
|
#4
|
||||
|
||||
Cita:
Usa la función AnsiUpperCase que pondrá las mayúsculas de acuerdo al juego de carcateres del sistema. Si éste es el español, entonces la ñ, diérecis, acentos y demás, serán convertidos correctamente. // Saludos |
#5
|
||||
|
||||
pero con ansiuppercase saca un error que no comprendo:
Cita:
|
#6
|
||||
|
||||
mm sera que como esto esta declarado en el evento KeyPress y este solo captura caracter a caracter y ansiuppercase transforma es cadena de caracteres se esta produciendo este error?? es posible
|
|
|
|