问一个关于字符的问题:(50分)

  • 主题发起人 主题发起人 CrendKing
  • 开始时间 开始时间
C

CrendKing

Unregistered / Unconfirmed
GUEST, unregistred user!
在 QB、VB 里我们可以用 Chr(39) 和 ASC("F") 两个函数来实现字符和 ASCII 之间的转换,但在 Delphi 里就只提供了 Chr 函数,那么如何实现 字符 => ASCII 呢?
 
Ord(字符)
其实Ord是任何可枚举的类型的取序数函数,如你自定义
TMyType = ( mtA,mtB,mtC);
则Ord(mtA)=0, Ord(mtB)=1
其实用法你自己研究吧。
 
例子:
type
Colors = (RED,BLUE,GREEN);
var
S: string;
begin
S := 'BLUE has an ordinal value of ' + IntToStr(Ord(BLUE)) + #13#10;
S := S + 'The ASCII code for "c" is ' + IntToStr(Ord('c')) + ' decimal';
MessageDlg(S, mtInformation, [mbOk], 0);
end;
 
其实,integer('a')就可以了
 
Byte 0 - 255呵呵。
Integer
 
多人接受答案了。
 
后退
顶部