Código Delphi [-] LabelEdit1.OnKeyUp( nil, letra, [ ssShift ] );
LabelEdit1.OnKeyUp( nil, letra, [ ssShift ] );