Delphi - como asigno un string de largo 1 a una var. char

Filtrado por el usuario: Daniel
<<>>
Filtrado por el usuario 'Daniel' (Eliminar fitro)
 
Vista: