Error al recorrer string

[creus]

Buenas, estoy intentando recorrer un strig en un Memo
Estoy usando el siguiente código,

for iindex=1 to length(Memo) do
begin
showmessage(Memo[iindex1]);
end;

Me sale un error de variable local, pero la única variable integer que utilzo que es iindex1, la tengo declarada en las variables públicas.


Gracias por la ayuda.