Требуется вывести на экран последовательность из ASCII-кодов

[Андрей.12]

Ваше "машинное" имя. Вводится строка символов. Требуется вывести на
экран последовательность из ASCII-кодов ее символов в десятичной системе
счисления. Поинтересуйтесь, как будет выглядеть кодировка Вашего имени.
Входные данные: ДОМ
Вывод на экран: 132 142 140
помогите найти ошибку:

var i:integer;
a:char;
s,k:string;
i:integer;
begin
a:=edit1.text;
for i:=1 to length(a) do begin
k:=Ord(a);
vak(k);
s:=s+k; end;
end;
end.

[Stilet]

for i:=1 to length(a) do write(ord(a[i]));

[Андрей.12]

a:=edit1.text;
ошибка

[Девочка-Скандал]

ошибка

какая ошибка то?

[Андрей.12]

[Error] Unit1.pas(32): Incompatible types: 'Char' and 'TCaption'

[Девочка-Скандал]

a:string;

а не char