[kolyacher]

Это гон какой то...

Записываю в data.txt символ "а"

пишу код...

for i:=0 to 66000 do
if Chr(Ord(GetChar(st, i))-i)='а' then
begin
st:=integerToString(i);
drawText(st,0,j);
j:=j+10;
end;


Выдает 64464...

Ставлю вместо i 64464 Выводит далеко не а???