[Admin]

Если я правильно понял, то так:

var
s: char;
i: integer;
begin
s:='b';
i:=Ord(s);
Form1.Caption:=IntToStr(i);
end;