우선 string type의 변수에서 문자 하나를 취하는 방법은 아래와 같읍니다.

var
  sTmp: String;
  iVal: integer;
begin
  sTmp := '123456';

  // Copy Function을 써서 접근하는 방법...     
  ival := strtoint(Copy(sTmp, 1, 1));

  // 직접 string을 배열 처럼 사용하는 방법...
  ival := Integer(sTmp[1]);
end;

그리고 말씀하신 run time Error는 strtoint 함수 기능에 관계된 것입니다.
strtoint 함수안의 string은 '0 ~ 9' 까지의 숫자 형태만 가능합니다.
당연히 영문자는 안되죠...

그리고 Val 이라는 함수를 사용하시면 다른 문자를 숫자로 바꿀 수 있읍니다.

도움이 되었으면 합니다.