Foros Club Delphi - Como poner en mayusculas el contenido del DbGrid

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

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - Como poner en mayusculas el contenido del DbGrid (https://www.clubdelphi.com/foros/showthread.php?t=2007)

Como poner en mayusculas el contenido del DbGrid

Hola compañeros, mi duda es como puedo hacer que en mi Dbgrid convierta los campos del grid a mayusculas , ya que este Dataaware no tiene una propiedad Uppercase.

Gracias.

Aunque no hace exactamente lo mismo, puedes utilizar la función SetText del campo o campos en cuestión para hacer esa conversión. La diferencia está en que el usuario no verá lo escrito en mayúsculas hasta que salga de la celda que está editando.

Código:

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

begin

  if Sender.DataType = ftString then

    Sender.AsString := UpperCase(Text);

end;

Si esto no te sirve, ya sería cuestión de interceptar el evento OnKeyPress del DBGrid y pasar ahí a mayúsculas el caracter introducido, Key := UpCase(Key);

Gracias Andres por la ayuda, lo que queria funciono con :
Key:=Upcase(Key), lo malo que no funciona con las ñ

Gracias.

Cita:

Posteado originalmente por IcebergDelphi
lo malo que no funciona con las ñ

Prueba con la función AnsiUpperCase

// Saludos