用什么办法可以提取一个字符的ACSII码值,并且赋给一个整型变量。该如何解决

用什么办法可以提取一个字符的ACSII码值,并且赋给一个整型变量。
用什么办法可以提取一个字符的ACSII码值,并且赋给一个整型变量。先谢谢各位大侠了,谢谢!!!

------解决方案--------------------
Delphi(Pascal) code


  vInt: Integer;

  vInt := ord('C');

------解决方案--------------------
var
i:integer;
 
i:=ord('字符');

--------------
楼上正解