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

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