Foros Club Delphi - insertar en mayusculas

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - insertar en mayusculas (https://www.clubdelphi.com/foros/showthread.php?t=5340)

vetustas

18-11-2003 18:03:41

insertar en mayusculas

Cómo hago para que todos los datos que se inserten en la base sean insertados en letras mayusculas? Trabajo con Delphi5 y Paradox
Gracias

roman

18-11-2003 18:12:23

Las componentes DBEdit tienen la propiedad CharCase que puedes ajustar para que sólo se escriban mayúsculas. Desafortunadamente los controles DBGrid carecen de tal propiedad.

Algo que puede hacerse es usar el evento OnSetText de los campos (que deberás agregar durante el diseño con el editor de campos):

Código:

procedure TForm1.Table1CampoSetText(Sender: TField; const Text: String);

begin

  Sender.AsString := UpperCase(Text);

end;

// Saludos

La franja horaria es GMT +2. Ahora son las 05:02:31.