Ayuda para escribir Símbolos Lógicos!!!

[[Lepe]]

Si coso dice que funciona, funcionará, pero teóricamente diría que no:

Código Delphi [-]
RichEdit1.Seltext:=RichEdit1.Seltext+'$';
 /*Este simbolo al escribirlo en "Symbol" te escribe el símbolo "Existe" */
RichEdit1.SelAttributes.Name:='Symbol';
RichEdit1.Sellength := 0;
RichEdit1.SelAttributes.Name:='Courier New';
RichEdit1.SetFocus;

Digo que teóricamente me suena mejor así:
- selecciono el texto
- cambio el tipo de letra
- deselecciono el texto
- restauro el tipo de letra.

Quizás después del SelLength habría que poner selStart := length(richedit1.lines.text) para que se desplace hasta el final el cursor... no sé.

Saludos