Pegar o caractere de uma string e colocar em um Array Integer

Olá, boa tarde.

Estou com problemas na hora de transformar Array Char para Array Integer, e este ser multiplicado por outra Array Integer. Tentei colocar na função para adicionar sozinho mas nem assim funcionou :(

Código:

FOR i:=1 TO 8 DO BEGIN

 edAND1.Text := edAND1.Text+IntToStr(A[i] * K[i]);
 END;

 FOR i:=9 TO 16 DO BEGIN
 edAND2.Text := edAND2.Text+IntToStr(A[i] * K[i]);
 END;

 FOR i:=17 TO 24 DO BEGIN
 edAND3.Text := edAND3.Text+IntToStr(A[i] * K[i]);
 END;

 FOR i:=25 TO 32 DO BEGIN
 edAND4.Text := edAND4.Text+IntToStr(A[i] * K[i]);
 END;

Tentei pegar com Lenght(edOcteto1.Text) porém não deu muito certo, pois é necessário utilizar um Array Char, procurei um pouco mais e tinha uma parte para **arrayCHAR* := Ord(A); Mas na hora de multiplicar ele dava números muito diferentes, era para resultar em 11000000, porém resultava em 01656411546**.*

@EDIT

*Percebi que o comando **ORD pega o ASCII** de um Char, porém eu não consegui achar(ainda) um comando que somente transforme Char em Integer, ou Char > String > Integer.*

Se puder ajudar, agradeço desde já,

iXaDe.