Mudando De String Para Char

[Cloud]

Senhores,

Preciso descobrir o código ASCII de um caractere no Delphi, para isso uso a função Ord, mas essa função só aceita valores Ordinal, ou seja, eu posso colocar um char.

Tenho um TEdit com um único caractere, mas não consigo passá-lo para a variável char:

raiz := xorRaiz.Text;

onde raiz é a variável char.

Como eu faço isso?

Abraços.

[s3c]

raiz := xorRaiz.Text[1];