insertar en mayusculas

[vetustas]

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]

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):


procedure TForm1.Table1CampoSetText(Sender: TField; const Text: String);
begin
Sender.AsString := UpperCase(Text);
end;



// Saludos