Edit solo en Mayusculas

[Alonsoab]

Estimado cyber-colega, lo que buscas es muy fácil de hacer pero por lo menos a mí me costó mucho encontrarlo, simplemente debes agregar una línea de código en el evento ONKEYPRESS de cualquier edit y/o combobox. Este es un ejemplo que debes repetir en cada uno de los edit y/o combobox que ocupes:

procedure TForm1.Edit7KeyPress(Sender: TObject; var Key: Char);
begin

key := UpperCase(Key)[1];

end;

Eso es todo... ojalá te sirva tanto como a mí.

PD: Esto lo ocupo en delphi 7, desconozco sus efectos en otra versiones.

Saludos.

CONSTANTINE