Hola dec, gracias por tu ayuda!! Te muestro parte del codigo que estoy usando para insertar un caracter especial.
Código Delphi
[-]
if (Form1.Frame21.RichEdit1.GetTextLen <= 9) then
begin
Aux:= Form1.Frame21.RichEdit1.GetTextLen + 1;
If (Aux<=10) then
begin
If (calendario_control(columnas_reg,Form1.RadioGroup1.ItemIndex, Rich_position,Input)) then
begin
If(Aux=10) then
begin
columnas_reg[Rich_position,Aux]:=Input; end
else
columnas_reg[Rich_position,Aux]:=Input;
Form1.Frame21.RichEdit1.Text:= Form1.Frame21.RichEdit1.Text + Input;
datos_variable(columnas_reg); Form1.Frame21.RichEdit1.SelStart:= Aux+1;
Form1.Frame21.RichEdit1.SelLength:=1;
Form1.Frame21.RichEdit1.SelAttributes.Color:=clWindowText;
If (Aux=10) then
begin
Form1.Frame21.RichEdit3.SetFocus;
exit;
end;
Form1.Frame21.RichEdit1.SetFocus;
end;
end;
end;
creo que es medio rebuscado, por eso queria saber bien si existia alguna forma mas sencilla.