Delphi - primer caracter

Hola amigos, mi pregunta es la siguiente:
Deseo acceder al primer caracter de una cadena: cuando utilizo cadena[1] me un error al correr el programa que dice error en la dirección 000AAAA , existe otra forma de hacerlo, o cómo puedo evitar el error?.

Si el resultado de cadena[1] lo asignas a una varuable del tipo char no te deberia dar ningun error.
Suerte