Mit str[loop] bekommst Du ein einzelnes Zeichen (Typ Char). Das ist keine Klasse und verfügt deshalb auch nicht über Eigenschaften wie Font. Du könntest Dir aber einmal die Eigenschaften von TRichEdit anschauen, die mit "Sel" beginnen, damit solltest Du weiterkommen.
[edit] Etwas zuviel C&P
[/edit]